home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-05-21 | 13.7 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar 9 12|
|00000040| 3a 34 35 3a 35 31 20 31 | 39 39 38 0a 3b 3b 3b 20 |:45:51 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 76 6d 2f 76 |s-20.3/l|isp/vm/v|
|000000a0| 6d 2d 76 69 72 74 75 61 | 6c 2e 65 6c 0a 3b 3b 3b |m-virtua|l.el.;;;|
|000000b0| 20 65 6d 61 63 73 20 76 | 65 72 73 69 6f 6e 20 32 | emacs v|ersion 2|
|000000c0| 30 2e 34 20 22 45 6d 65 | 72 61 6c 64 22 20 58 45 |0.4 "Eme|rald" XE|
|000000d0| 6d 61 63 73 20 20 4c 75 | 63 69 64 2e 0a 3b 3b 3b |macs Lu|cid..;;;|
|000000e0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000f0| 6e 20 32 2e 32 35 20 58 | 45 6d 61 63 73 3b 20 32 |n 2.25 X|Emacs; 2|
|00000100| 32 2d 4d 61 72 2d 39 36 | 2e 0a 3b 3b 3b 20 6f 70 |2-Mar-96|..;;; op|
|00000110| 74 69 6d 69 7a 61 74 69 | 6f 6e 20 69 73 20 6f 6e |timizati|on is on|
|00000120| 2e 0a 3b 3b 3b 20 74 68 | 69 73 20 66 69 6c 65 20 |..;;; th|is file |
|00000130| 75 73 65 73 20 6f 70 63 | 6f 64 65 73 20 77 68 69 |uses opc|odes whi|
|00000140| 63 68 20 64 6f 20 6e 6f | 74 20 65 78 69 73 74 20 |ch do no|t exist |
|00000150| 69 6e 20 45 6d 61 63 73 | 20 31 39 2e 0a 0a 28 69 |in Emacs| 19...(i|
|00000160| 66 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |f (and (|boundp '|
|00000170| 65 6d 61 63 73 2d 76 65 | 72 73 69 6f 6e 29 0a 09 |emacs-ve|rsion)..|
|00000180| 20 28 6f 72 20 28 61 6e | 64 20 28 62 6f 75 6e 64 | (or (an|d (bound|
|00000190| 70 20 27 65 70 6f 63 68 | 3a 3a 76 65 72 73 69 6f |p 'epoch|::versio|
|000001a0| 6e 29 20 65 70 6f 63 68 | 3a 3a 76 65 72 73 69 6f |n) epoch|::versio|
|000001b0| 6e 29 0a 09 20 20 20 20 | 20 28 73 74 72 69 6e 67 |n).. | (string|
|000001c0| 2d 6c 65 73 73 70 20 65 | 6d 61 63 73 2d 76 65 72 |-lessp e|macs-ver|
|000001d0| 73 69 6f 6e 20 22 32 30 | 22 29 29 29 0a 20 20 20 |sion "20|"))). |
|000001e0| 20 28 65 72 72 6f 72 20 | 22 60 76 6d 2d 76 69 72 | (error |"`vm-vir|
|000001f0| 74 75 61 6c 2e 65 6c 27 | 20 77 61 73 20 63 6f 6d |tual.el'| was com|
|00000200| 70 69 6c 65 64 20 66 6f | 72 20 45 6d 61 63 73 20 |piled fo|r Emacs |
|00000210| 32 30 22 29 29 0a 0a 28 | 6f 72 20 28 62 6f 75 6e |20"))..(|or (boun|
|00000220| 64 70 20 27 63 75 72 72 | 65 6e 74 2d 6c 6f 61 64 |dp 'curr|ent-load|
|00000230| 2d 6c 69 73 74 29 20 28 | 73 65 74 71 20 63 75 72 |-list) (|setq cur|
|00000240| 72 65 6e 74 2d 6c 6f 61 | 64 2d 6c 69 73 74 20 6e |rent-loa|d-list n|
|00000250| 69 6c 29 29 0a 0a 0a 28 | 70 72 6f 76 69 64 65 20 |il))...(|provide |
|00000260| 27 76 6d 2d 76 69 72 74 | 75 61 6c 29 0a 28 64 65 |'vm-virt|ual).(de|
|00000270| 66 61 6c 69 61 73 20 27 | 76 6d 2d 62 75 69 6c 64 |falias '|vm-build|
|00000280| 2d 76 69 72 74 75 61 6c | 2d 6d 65 73 73 61 67 65 |-virtual|-message|
|00000290| 2d 6c 69 73 74 20 23 5b | 28 6e 65 77 2d 6d 65 73 |-list #[|(new-mes|
|000002a0| 73 61 67 65 73 20 26 6f | 70 74 69 6f 6e 61 6c 20 |sages &o|ptional |
|000002b0| 64 6f 6e 74 2d 66 69 6e | 61 6c 69 7a 65 29 20 22 |dont-fin|alize) "|
|000002c0| 08 41 c1 c2 c3 5c 22 70 | 0c c5 0e 06 3f ad 84 c7 |.A...\"p|....?...|
|000002d0| 0e 08 21 c9 89 89 89 89 | 89 89 89 89 89 89 89 89 |..!.....|........|
|000002e0| 1e 5c 6e 1e 0b 1e 0c 1e | 0d 1e 0e 1e 0f 1e 10 1e |.\n.....|........|
|000002f0| 11 1e 12 1e 13 1e 14 1e | 15 1e 16 1e 17 1e 18 1e |........|........|
|00000300| 19 1e 1a 1e 1b 1e 1c 0e | 06 ac d1 0e 08 ab 89 0e |........|........|
|00000310| 1d 40 c3 48 16 14 aa a4 | c3 16 0b c1 0e 1e c9 5c |.@.H....|.......\|
|00000320| 22 16 14 0e 0b 0e 1e 57 | ab 93 0e 14 0e 0b df 20 |"......W|....... |
|00000330| c9 89 93 49 88 0e 0b 54 | 89 16 0b aa 68 0e 08 89 |...I...T|....h...|
|00000340| 16 12 ab 99 e0 0e 12 40 | e1 48 e2 48 4a e1 48 e3 |.......@|.H.HJ.H.|
|00000350| 48 0e 1b 5c 22 88 0e 12 | 41 89 16 12 ac 67 8a 0e |H..\"...|A....g..|
|00000360| 1c 83 c9 02 0e 1c 40 40 | 16 11 0e 1c 40 41 16 0f |......@@|....@A..|
|00000370| 0e 11 83 c0 02 0e 11 40 | 89 16 10 3b ab 88 e4 0e |.......@|...;....|
|00000380| 10 0e 25 5c 22 16 10 0e | 10 3c ab 86 e6 0e 10 21 |..%\"...|.<.....!|
|00000390| 16 10 0e 10 83 b7 02 0e | 10 3b ab 9a e7 0e 10 21 |........|.;.....!|
|000003a0| ab 94 0e 11 e8 e9 ea eb | 0e 10 c5 c9 23 21 21 21 |........|....#!!!|
|000003b0| a4 16 11 82 b7 02 0e 2c | ab ae ed 0e 10 21 ab 8c |.......,|.....!..|
|000003c0| 0e 2c 40 e1 48 ee 48 0e | 10 61 ac 9c 0e 10 3b 83 |.,@.H.H.|.a....;.|
|000003d0| b7 02 0e 2c 40 e1 48 ee | 48 c5 c9 1e 2f 1e 30 f1 |...,@.H.|H.../.0.|
|000003e0| 0e 10 21 2a 61 83 b7 02 | ed 0e 10 21 ab 84 0e 10 |..!*a...|...!....|
|000003f0| ae 91 f2 0e 10 21 ae 8b | c5 c9 1e 2f 1e 30 f1 0e |.....!..|.../.0..|
|00000400| 10 21 2a 71 88 0e 33 f4 | 61 ab 8d c5 16 15 f5 0e |.!*q..3.|a.......|
|00000410| 36 0e 5c 6e 5c 22 16 5c | 6e aa 98 c9 16 15 70 0e |6.\n\".\|n.....p.|
|00000420| 5c 6e 73 ac 86 70 0e 5c | 6e 42 16 5c 6e 0e 33 f7 |\ns..p.\|nB.\n.3.|
|00000430| 61 ac 83 f7 20 88 ed 0e | 10 21 ab 9f 0e 15 ab 8f |a... ...|.!......|
|00000440| 0e 1c 40 f8 c9 f9 fa 0e | 36 5c 22 5c 22 a0 88 aa |..@.....|6\"\"...|
|00000450| 8c 0e 3a ab 88 0e 1c 40 | 0e 3a 43 a0 88 0e 2c ae |..:....@|.:C...,.|
|00000460| 82 0e 08 89 16 12 83 b7 | 02 0e 06 ac 93 fb 0e 12 |........|........|
|00000470| 40 e1 48 e2 48 4a e1 48 | e3 48 0e 1b 5c 22 84 ae |@.H.HJ.H|.H..\"..|
|00000480| 02 0e 15 ab 9a 8a 0e 12 | 40 e1 48 e2 48 4a e1 48 |........|@.H.HJ.H|
|00000490| ee 48 71 88 fc fd 0e 12 | 40 0e 0f 23 29 aa 88 fc |.Hq.....|@..#)...|
|000004a0| fd 0e 12 40 0e 0f 23 83 | ae 02 0e 06 ac 91 e0 0e |...@..#.|........|
|000004b0| 12 40 e1 48 e2 48 4a e1 | 48 e3 48 0e 1b 5c 22 88 |.@.H.HJ.|H.H..\".|
|000004c0| fe 0e 12 40 e1 48 e2 48 | 4a 21 16 13 0e 19 ac ad |...@.H.H|J!......|
|000004d0| 0e 13 ff c1 0e 40 c9 5c | 22 49 88 0e 13 ff 48 e1 |.....@.\|"I....H.|
|000004e0| 81 41 00 81 42 00 21 49 | 88 0e 13 ff 48 e1 48 c9 |.A..B.!I|....H.H.|
|000004f0| 4c 88 0e 13 81 43 00 c1 | 0e 44 c9 5c 22 49 88 0e |L....C..|.D.\"I..|
|00000500| 13 c3 0e 14 49 88 0e 13 | e1 c1 0e 45 c9 5c 22 49 |....I...|...E.\"I|
|00000510| 88 0e 13 e1 48 e2 0e 12 | 40 e1 48 e2 48 49 88 0e |....H...|@.H.HI..|
|00000520| 13 e1 48 81 46 00 0e 47 | 49 88 0e 13 e1 48 e3 0e |..H.F..G|I....H..|
|00000530| 48 49 88 0e 48 54 16 48 | 0e 13 e1 48 ee 0e 1a 49 |HI..HT.H|...H...I|
|00000540| 88 0e 13 e1 48 81 49 00 | 81 41 00 81 4a 00 21 49 |....H.I.|.A..J.!I|
|00000550| 88 0e 13 e1 48 81 49 00 | 48 0e 17 4c 88 0e 17 ac |....H.I.|H..L....|
|00000560| 8a 0e 13 43 89 16 16 16 | 17 aa 95 0e 17 0e 13 43 |...C....|.......C|
|00000570| a1 88 0e 16 ac 85 0e 17 | 41 16 16 0e 17 41 16 17 |........|A....A..|
|00000580| 0e 12 41 89 16 12 84 9c | 01 0e 11 41 89 16 11 84 |..A.....|...A....|
|00000590| b1 00 0e 1c 41 89 16 1c | 84 a0 00 29 0e 06 ab 85 |....A...|...)....|
|000005a0| 0e 16 82 62 03 0e 4b 54 | 16 4b c5 0e 4c 1e 4d 1e |...b..KT|.K..L.M.|
|000005b0| 4e 0e 36 ac 84 0e 5c 6e | 16 36 8a 0e 5c 6e ab a5 |N.6...\n|.6..\n..|
|000005c0| 0e 5c 6e 40 71 88 81 4f | 00 81 50 00 0e 4c 5c 22 |.\n@q..O|..P..L\"|
|000005d0| 88 0e 1a 0e 51 73 ac 87 | 0e 1a 0e 51 42 16 51 0e |....Qs..|...QB.Q.|
|000005e0| 5c 6e 41 89 16 5c 6e ac | 5b 29 0e 16 89 16 12 ab |\nA..\n.|[)......|
|000005f0| a2 0e 12 40 e1 48 e2 48 | 4a ff 48 e1 48 0e 12 40 |...@.H.H|J.H.H..@|
|00000600| 0e 12 40 ff 48 e1 48 4a | 42 4c 88 0e 12 41 89 16 |..@.H.HJ|BL...A..|
|00000610| 12 ac 5e 0e 08 ab 90 81 | 52 00 0e 16 21 88 81 53 |..^.....|R...!..S|
|00000620| 00 0e 16 21 88 aa 90 81 | 52 00 c5 21 88 81 53 00 |...!....|R..!..S.|
|00000630| c5 21 88 0e 16 16 08 0e | 16 2a 2e 13 87 22 20 5b |.!......|.*..." [|
|00000640| 76 6d 2d 76 69 72 74 75 | 61 6c 2d 66 6f 6c 64 65 |vm-virtu|al-folde|
|00000650| 72 2d 64 65 66 69 6e 69 | 74 69 6f 6e 20 6d 61 6b |r-defini|tion mak|
|00000660| 65 2d 76 65 63 74 6f 72 | 20 33 31 31 20 30 20 76 |e-vector| 311 0 v|
|00000670| 6d 2d 76 69 72 74 75 61 | 6c 2d 6d 69 72 72 6f 72 |m-virtua|l-mirror|
|00000680| 20 74 20 64 6f 6e 74 2d | 66 69 6e 61 6c 69 7a 65 | t dont-|finalize|
|00000690| 20 76 6d 2d 6c 61 73 74 | 20 76 6d 2d 6d 65 73 73 | vm-last| vm-mess|
|000006a0| 61 67 65 2d 6c 69 73 74 | 20 6e 69 6c 20 72 65 61 |age-list| nil rea|
|000006b0| 6c 2d 62 75 66 66 65 72 | 73 2d 75 73 65 64 20 69 |l-buffer|s-used i|
|000006c0| 20 61 72 67 6c 69 73 74 | 20 73 65 6c 65 63 74 6f | arglist| selecto|
|000006d0| 72 20 73 65 6c 2d 6c 69 | 73 74 20 73 65 6c 65 63 |r sel-li|st selec|
|000006e0| 74 6f 72 73 20 66 6f 6c | 64 65 72 20 66 6f 6c 64 |tors fol|der fold|
|000006f0| 65 72 73 20 6d 70 20 6d | 65 73 73 61 67 65 20 6c |ers mp m|essage l|
|00000700| 6f 63 61 74 69 6f 6e 2d | 76 65 63 74 6f 72 20 76 |ocation-|vector v|
|00000710| 69 72 74 75 61 6c 20 6e | 65 77 2d 6d 65 73 73 61 |irtual n|ew-messa|
|00000720| 67 65 2d 6c 69 73 74 20 | 74 61 69 6c 2d 63 6f 6e |ge-list |tail-con|
|00000730| 73 20 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 |s case-f|old-sear|
|00000740| 63 68 20 6d 69 72 72 6f | 72 65 64 20 76 62 75 66 |ch mirro|red vbuf|
|00000750| 66 65 72 20 6d 65 73 73 | 61 67 65 2d 73 65 74 20 |fer mess|age-set |
|00000760| 63 6c 61 75 73 65 73 20 | 76 6d 2d 6d 65 73 73 61 |clauses |vm-messa|
|00000770| 67 65 2d 70 6f 69 6e 74 | 65 72 20 76 6d 2d 6c 6f |ge-point|er vm-lo|
|00000780| 63 61 74 69 6f 6e 2d 64 | 61 74 61 2d 76 65 63 74 |cation-d|ata-vect|
|00000790| 6f 72 2d 6c 65 6e 67 74 | 68 20 6d 61 6b 65 2d 6d |or-lengt|h make-m|
|000007a0| 61 72 6b 65 72 20 69 6e | 74 65 72 6e 20 31 20 35 |arker in|tern 1 5|
|000007b0| 20 38 20 65 78 70 61 6e | 64 2d 66 69 6c 65 2d 6e | 8 expan|d-file-n|
|000007c0| 61 6d 65 20 76 6d 2d 66 | 6f 6c 64 65 72 2d 64 69 |ame vm-f|older-di|
|000007d0| 72 65 63 74 6f 72 79 20 | 65 76 61 6c 20 66 69 6c |rectory |eval fil|
|000007e0| 65 2d 64 69 72 65 63 74 | 6f 72 79 2d 70 20 76 6d |e-direct|ory-p vm|
|000007f0| 2d 64 65 6c 65 74 65 2d | 62 61 63 6b 75 70 2d 66 |-delete-|backup-f|
|00000800| 69 6c 65 2d 6e 61 6d 65 | 73 20 76 6d 2d 64 65 6c |ile-name|s vm-del|
|00000810| 65 74 65 2d 61 75 74 6f | 2d 73 61 76 65 2d 66 69 |ete-auto|-save-fi|
|00000820| 6c 65 2d 6e 61 6d 65 73 | 20 76 6d 2d 64 65 6c 65 |le-names| vm-dele|
|00000830| 74 65 2d 64 69 72 65 63 | 74 6f 72 79 2d 66 69 6c |te-direc|tory-fil|
|00000840| 65 2d 6e 61 6d 65 73 20 | 64 69 72 65 63 74 6f 72 |e-names |director|
|00000850| 79 2d 66 69 6c 65 73 20 | 6e 65 77 2d 6d 65 73 73 |y-files |new-mess|
|00000860| 61 67 65 73 20 62 75 66 | 66 65 72 70 20 39 20 65 |ages buf|ferp 9 e|
|00000870| 6e 61 62 6c 65 2d 6c 6f | 63 61 6c 2d 76 61 72 69 |nable-lo|cal-vari|
|00000880| 61 62 6c 65 73 20 69 6e | 68 69 62 69 74 2d 6c 6f |ables in|hibit-lo|
|00000890| 63 61 6c 2d 76 61 72 69 | 61 62 6c 65 73 20 66 69 |cal-vari|ables fi|
|000008a0| 6e 64 2d 66 69 6c 65 2d | 6e 6f 73 65 6c 65 63 74 |nd-file-|noselect|
|000008b0| 20 76 6d 2d 67 65 74 2d | 66 69 6c 65 2d 62 75 66 | vm-get-|file-buf|
|000008c0| 66 65 72 20 6d 61 6a 6f | 72 2d 6d 6f 64 65 20 76 |fer majo|r-mode v|
|000008d0| 6d 2d 76 69 72 74 75 61 | 6c 2d 6d 6f 64 65 20 61 |m-virtua|l-mode a|
|000008e0| 70 70 65 6e 64 20 76 6d | 2d 72 65 61 6c 2d 62 75 |ppend vm|-real-bu|
|000008f0| 66 66 65 72 73 20 76 6d | 2d 6d 6f 64 65 20 64 65 |ffers vm|-mode de|
|00000900| 6c 71 20 6d 61 70 63 61 | 72 20 62 75 66 66 65 72 |lq mapca|r buffer|
|00000910| 2d 66 69 6c 65 2d 6e 61 | 6d 65 20 69 6e 74 65 72 |-file-na|me inter|
|00000920| 6e 2d 73 6f 66 74 20 61 | 70 70 6c 79 20 76 6d 2d |n-soft a|pply vm-|
|00000930| 76 73 2d 6f 72 20 63 6f | 70 79 2d 73 65 71 75 65 |vs-or co|py-seque|
|00000940| 6e 63 65 20 34 20 76 6d | 2d 6d 69 72 72 6f 72 2d |nce 4 vm|-mirror-|
|00000950| 64 61 74 61 2d 76 65 63 | 74 6f 72 2d 6c 65 6e 67 |data-vec|tor-leng|
|00000960| 74 68 20 6d 61 6b 65 2d | 73 79 6d 62 6f 6c 20 22 |th make-|symbol "|
|00000970| 3c 76 3e 22 20 32 20 76 | 6d 2d 61 74 74 72 69 62 |<v>" 2 v|m-attrib|
|00000980| 75 74 65 73 2d 76 65 63 | 74 6f 72 2d 6c 65 6e 67 |utes-vec|tor-leng|
|00000990| 74 68 20 76 6d 2d 73 6f | 66 74 64 61 74 61 2d 76 |th vm-so|ftdata-v|
|000009a0| 65 63 74 6f 72 2d 6c 65 | 6e 67 74 68 20 37 20 76 |ector-le|ngth 7 v|
|000009b0| 6d 2d 66 6f 6c 64 65 72 | 2d 74 79 70 65 20 76 6d |m-folder|-type vm|
|000009c0| 2d 6d 65 73 73 61 67 65 | 2d 69 64 2d 6e 75 6d 62 |-message|-id-numb|
|000009d0| 65 72 20 36 20 22 3c 2d | 2d 22 20 76 6d 2d 6d 6f |er 6 "<-|-" vm-mo|
|000009e0| 64 69 66 69 63 61 74 69 | 6f 6e 2d 63 6f 75 6e 74 |dificati|on-count|
|000009f0| 65 72 20 76 6d 2d 6c 61 | 62 65 6c 2d 6f 62 61 72 |er vm-la|bel-obar|
|00000a00| 72 61 79 20 6c 61 62 65 | 6c 2d 6f 62 61 72 72 61 |ray labe|l-obarra|
|00000a10| 79 20 69 6e 68 69 62 69 | 74 2d 71 75 69 74 20 6d |y inhibi|t-quit m|
|00000a20| 61 70 61 74 6f 6d 73 20 | 23 5b 28 78 29 20 22 c0 |apatoms |#[(x) ".|
|00000a30| c1 5c 6e 21 0b 5c 22 87 | 22 20 5b 69 6e 74 65 72 |.\n!.\".|" [inter|
|00000a40| 6e 20 73 79 6d 62 6f 6c | 2d 6e 61 6d 65 20 78 20 |n symbol|-name x |
|00000a50| 6c 61 62 65 6c 2d 6f 62 | 61 72 72 61 79 5d 20 33 |label-ob|array] 3|
|00000a60| 5d 20 76 6d 2d 76 69 72 | 74 75 61 6c 2d 62 75 66 |] vm-vir|tual-buf|
|00000a70| 66 65 72 73 20 76 6d 2d | 73 65 74 2d 73 75 6d 6d |fers vm-|set-summ|
|00000a80| 61 72 79 2d 72 65 64 6f | 2d 73 74 61 72 74 2d 70 |ary-redo|-start-p|
|00000a90| 6f 69 6e 74 20 76 6d 2d | 73 65 74 2d 6e 75 6d 62 |oint vm-|set-numb|
|00000aa0| 65 72 69 6e 67 2d 72 65 | 64 6f 2d 73 74 61 72 74 |ering-re|do-start|
|00000ab0| 2d 70 6f 69 6e 74 5d 20 | 32 30 20 22 5c 0a 42 75 |-point] |20 "\.Bu|
|00000ac0| 69 6c 64 73 20 61 20 6c | 69 73 74 20 6f 66 20 6d |ilds a l|ist of m|
|00000ad0| 65 73 73 61 67 65 73 20 | 6d 61 74 63 68 69 6e 67 |essages |matching|
|00000ae0| 20 74 68 65 20 76 69 72 | 74 75 61 6c 20 66 6f 6c | the vir|tual fol|
|00000af0| 64 65 72 20 64 65 66 69 | 6e 69 74 69 6f 6e 0a 73 |der defi|nition.s|
|00000b00| 74 6f 72 65 64 20 69 6e | 20 74 68 65 20 76 61 72 |tored in| the var|
|00000b10| 69 61 62 6c 65 20 76 6d | 2d 76 69 72 74 75 61 6c |iable vm|-virtual|
|00000b20| 2d 66 6f 6c 64 65 72 2d | 64 65 66 69 6e 69 74 69 |-folder-|definiti|
|00000b30| 6f 6e 2e 0a 0a 49 66 20 | 74 68 65 20 4e 45 57 2d |on...If |the NEW-|
|00000b40| 4d 45 53 53 41 47 45 53 | 20 61 72 67 75 6d 65 6e |MESSAGES| argumen|
|00000b50| 74 20 69 73 20 6e 69 6c | 2c 20 74 68 65 20 6d 65 |t is nil|, the me|
|00000b60| 73 73 61 67 65 20 6c 69 | 73 74 20 69 73 0a 64 65 |ssage li|st is.de|
|00000b70| 72 69 76 65 64 20 66 72 | 6f 6d 20 74 68 65 20 66 |rived fr|om the f|
|00000b80| 6f 6c 64 65 72 73 20 6c | 69 73 74 65 64 20 69 6e |olders l|isted in|
|00000b90| 20 74 68 65 20 76 69 72 | 74 75 61 6c 20 66 6f 6c | the vir|tual fol|
|00000ba0| 64 65 72 0a 64 65 66 69 | 6e 69 74 69 6f 6e 20 61 |der.defi|nition a|
|00000bb0| 6e 64 20 73 65 6c 65 63 | 74 65 64 20 62 79 20 74 |nd selec|ted by t|
|00000bc0| 68 65 20 76 61 72 69 6f | 75 73 20 73 65 6c 65 63 |he vario|us selec|
|00000bd0| 74 6f 72 73 2e 20 20 54 | 68 65 0a 72 65 73 75 6c |tors. T|he.resul|
|00000be0| 74 69 6e 67 20 6d 65 73 | 73 61 67 65 20 6c 69 73 |ting mes|sage lis|
|00000bf0| 74 20 69 73 20 61 73 73 | 69 67 6e 65 64 20 74 6f |t is ass|igned to|
|00000c00| 20 76 6d 2d 6d 65 73 73 | 61 67 65 2d 6c 69 73 74 | vm-mess|age-list|
|00000c10| 20 75 6e 6c 65 73 73 0a | 44 4f 4e 54 2d 46 49 4e | unless.|DONT-FIN|
|00000c20| 41 4c 49 5a 45 20 69 73 | 20 6e 6f 6e 2d 6e 69 6c |ALIZE is| non-nil|
|00000c30| 2e 0a 0a 49 66 20 4e 45 | 57 2d 4d 45 53 53 41 47 |...If NE|W-MESSAG|
|00000c40| 45 53 20 69 73 20 6e 6f | 6e 2d 6e 69 6c 20 74 68 |ES is no|n-nil th|
|00000c50| 65 6e 20 69 74 20 69 73 | 20 61 20 6c 69 73 74 20 |en it is| a list |
|00000c60| 6f 66 20 6d 65 73 73 61 | 67 65 73 20 74 6f 0a 62 |of messa|ges to.b|
|00000c70| 65 20 74 72 69 65 64 20 | 61 67 61 69 6e 73 74 20 |e tried |against |
|00000c80| 74 68 65 20 73 65 6c 65 | 63 74 6f 72 20 70 61 72 |the sele|ctor par|
|00000c90| 74 73 20 6f 66 20 74 68 | 65 20 76 69 72 74 75 61 |ts of th|e virtua|
|00000ca0| 6c 20 66 6f 6c 64 65 72 | 0a 64 65 66 69 6e 69 74 |l folder|.definit|
|00000cb0| 69 6f 6e 2e 20 20 4d 61 | 74 63 68 69 6e 67 20 6d |ion. Ma|tching m|
|00000cc0| 65 73 73 61 67 65 73 20 | 61 72 65 20 61 64 64 65 |essages |are adde|
|00000cd0| 64 20 74 6f 20 76 6d 2d | 6d 65 73 73 61 67 65 2d |d to vm-|message-|
|00000ce0| 6c 69 73 74 2c 0a 69 6e | 73 74 65 61 64 20 6f 66 |list,.in|stead of|
|00000cf0| 20 72 65 70 6c 61 63 69 | 6e 67 20 69 74 2e 0a 0a | replaci|ng it...|
|00000d00| 54 68 65 20 6d 65 73 73 | 61 67 65 73 20 69 6e 20 |The mess|ages in |
|00000d10| 74 68 65 20 4e 45 57 2d | 4d 45 53 53 41 47 45 53 |the NEW-|MESSAGES|
|00000d20| 20 6c 69 73 74 2c 20 69 | 66 20 61 6e 79 2c 20 6d | list, i|f any, m|
|00000d30| 75 73 74 20 61 6c 6c 20 | 62 65 20 69 6e 20 74 68 |ust all |be in th|
|00000d40| 65 0a 73 61 6d 65 20 72 | 65 61 6c 20 66 6f 6c 64 |e.same r|eal fold|
|00000d50| 65 72 2e 0a 0a 54 68 65 | 20 6c 69 73 74 20 6f 66 |er...The| list of|
|00000d60| 20 6d 61 74 63 68 69 6e | 67 20 76 69 72 74 75 61 | matchin|g virtua|
|00000d70| 6c 20 6d 65 73 73 61 67 | 65 73 20 69 73 20 72 65 |l messag|es is re|
|00000d80| 74 75 72 6e 65 64 2e 0a | 0a 49 66 20 44 4f 4e 54 |turned..|.If DONT|
|00000d90| 2d 46 49 4e 41 4c 49 5a | 45 20 69 73 20 6e 69 6c |-FINALIZ|E is nil|
|00000da0| 2c 20 69 6e 20 61 64 64 | 69 74 69 6f 6e 20 74 6f |, in add|ition to|
|00000db0| 20 76 6d 2d 6d 65 73 73 | 61 67 65 2d 6c 69 73 74 | vm-mess|age-list|
|00000dc0| 20 62 65 69 6e 67 0a 73 | 65 74 2c 20 74 68 65 20 | being.s|et, the |
|00000dd0| 76 69 72 74 75 61 6c 20 | 6d 65 73 73 61 67 65 73 |virtual |messages|
|00000de0| 20 61 72 65 20 61 64 64 | 65 64 20 74 6f 20 74 68 | are add|ed to th|
|00000df0| 65 20 76 69 72 74 75 61 | 6c 20 6d 65 73 73 61 67 |e virtua|l messag|
|00000e00| 65 0a 6c 69 73 74 73 20 | 6f 66 20 74 68 65 69 72 |e.lists |of their|
|00000e10| 20 72 65 61 6c 20 6d 65 | 73 73 61 67 65 73 2c 20 | real me|ssages, |
|00000e20| 74 68 65 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |the curr|ent buff|
|00000e30| 65 72 20 69 73 20 61 64 | 64 65 64 20 74 6f 0a 76 |er is ad|ded to.v|
|00000e40| 6d 2d 76 69 72 74 75 61 | 6c 2d 62 75 66 66 65 72 |m-virtua|l-buffer|
|00000e50| 73 20 6c 69 73 74 20 6f | 66 20 65 61 63 68 20 72 |s list o|f each r|
|00000e60| 65 61 6c 20 66 6f 6c 64 | 65 72 20 62 75 66 66 65 |eal fold|er buffe|
|00000e70| 72 20 72 65 70 72 65 73 | 65 6e 74 65 64 0a 69 6e |r repres|ented.in|
|00000e80| 20 74 68 65 20 76 69 72 | 74 75 61 6c 20 6c 69 73 | the vir|tual lis|
|00000e90| 74 2c 20 61 6e 64 20 76 | 6d 2d 72 65 61 6c 2d 62 |t, and v|m-real-b|
|00000ea0| 75 66 66 65 72 73 20 69 | 73 20 73 65 74 20 74 6f |uffers i|s set to|
|00000eb0| 20 61 20 6c 69 73 74 20 | 6f 66 0a 61 6c 6c 20 74 | a list |of.all t|
|00000ec0| 68 65 20 72 65 61 6c 20 | 66 6f 6c 64 65 72 20 62 |he real |folder b|
|00000ed0| 75 66 66 65 72 73 20 69 | 6e 76 6f 6c 76 65 64 2e |uffers i|nvolved.|
|00000ee0| 22 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |"]).(def|alias 'v|
|00000ef0| 6d 2d 63 72 65 61 74 65 | 2d 76 69 72 74 75 61 6c |m-create|-virtual|
|00000f00| 2d 66 6f 6c 64 65 72 20 | 23 5b 28 73 65 6c 65 63 |-folder |#[(selec|
|00000f10| 74 6f 72 20 26 6f 70 74 | 69 6f 6e 61 6c 20 61 72 |tor &opt|ional ar|
|00000f20| 67 20 72 65 61 64 2d 6f | 6e 6c 79 20 6e 61 6d 65 |g read-o|nly name|
|00000f30| 29 20 22 08 ab 8d c1 08 | 21 ac 85 c2 c3 21 ab 83 |) ".....|!....!..|
|00000f40| 08 71 88 c4 20 88 c5 20 | 88 c6 1e 07 0e 08 ac 9a |.q.. .. |........|
|00000f50| 0e 09 ab 8d ca cb c1 20 | 0e 0c 0e 09 24 16 08 aa |....... |....$...|
|00000f60| 89 ca cd c1 20 0e 0c 23 | 16 08 0e 08 ce c1 20 44 |.... ..#|...... D|
|00000f70| 43 0e 09 ab 87 0e 0c 0e | 09 44 aa 83 0e 0c 43 44 |C.......|.D....CD|
|00000f80| 44 43 16 07 cf 0e 08 0e | 10 5c 22 88 29 0e 11 ad |DC......|.\".)...|
|00000f90| 82 d2 20 87 22 20 5b 76 | 6d 2d 6d 61 69 6c 2d 62 |.. ." [v|m-mail-b|
|00000fa0| 75 66 66 65 72 20 62 75 | 66 66 65 72 2d 6e 61 6d |uffer bu|ffer-nam|
|00000fb0| 65 20 65 72 72 6f 72 20 | 22 46 6f 6c 64 65 72 20 |e error |"Folder |
|00000fc0| 62 75 66 66 65 72 20 68 | 61 73 20 62 65 65 6e 20 |buffer h|as been |
|00000fd0| 6b 69 6c 6c 65 64 2e 22 | 20 76 6d 2d 63 68 65 63 |killed."| vm-chec|
|00000fe0| 6b 2d 66 6f 72 2d 6b 69 | 6c 6c 65 64 2d 73 75 6d |k-for-ki|lled-sum|
|00000ff0| 6d 61 72 79 20 76 6d 2d | 65 72 72 6f 72 2d 69 66 |mary vm-|error-if|
|00001000| 2d 66 6f 6c 64 65 72 2d | 65 6d 70 74 79 20 6e 69 |-folder-|empty ni|
|00001010| 6c 20 76 6d 2d 76 69 72 | 74 75 61 6c 2d 66 6f 6c |l vm-vir|tual-fol|
|00001020| 64 65 72 2d 61 6c 69 73 | 74 20 6e 61 6d 65 20 61 |der-alis|t name a|
|00001030| 72 67 20 66 6f 72 6d 61 | 74 20 22 25 73 20 25 73 |rg forma|t "%s %s|
|00001040| 20 25 73 22 20 73 65 6c | 65 63 74 6f 72 20 22 25 | %s" sel|ector "%|
|00001050| 73 20 25 73 22 20 67 65 | 74 2d 62 75 66 66 65 72 |s %s" ge|t-buffer|
|00001060| 20 76 6d 2d 76 69 73 69 | 74 2d 76 69 72 74 75 61 | vm-visi|t-virtua|
|00001070| 6c 2d 66 6f 6c 64 65 72 | 20 72 65 61 64 2d 6f 6e |l-folder| read-on|
|00001080| 6c 79 20 76 6d 2d 75 73 | 65 2d 6d 65 6e 75 73 20 |ly vm-us|e-menus |
|00001090| 76 6d 2d 6d 65 6e 75 2d | 69 6e 73 74 61 6c 6c 2d |vm-menu-|install-|
|000010a0| 6b 6e 6f 77 6e 2d 76 69 | 72 74 75 61 6c 2d 66 6f |known-vi|rtual-fo|
|000010b0| 6c 64 65 72 73 2d 6d 65 | 6e 75 5d 20 35 20 22 5c |lders-me|nu] 5 "\|
|000010c0| 0a 43 72 65 61 74 65 20 | 61 20 6e 65 77 20 76 69 |.Create |a new vi|
|000010d0| 72 74 75 61 6c 20 66 6f | 6c 64 65 72 20 66 72 6f |rtual fo|lder fro|
|000010e0| 6d 20 6d 65 73 73 61 67 | 65 73 20 69 6e 20 74 68 |m messag|es in th|
|000010f0| 65 20 63 75 72 72 65 6e | 74 20 66 6f 6c 64 65 72 |e curren|t folder|
|00001100| 2e 0a 54 68 65 20 6d 65 | 73 73 61 67 65 73 20 77 |..The me|ssages w|
|00001110| 69 6c 6c 20 62 65 20 63 | 68 6f 73 65 6e 20 62 79 |ill be c|hosen by|
|00001120| 20 61 70 70 6c 79 69 6e | 67 20 74 68 65 20 73 65 | applyin|g the se|
|00001130| 6c 65 63 74 6f 72 20 79 | 6f 75 20 73 70 65 63 69 |lector y|ou speci|
|00001140| 66 79 2c 0a 77 68 69 63 | 68 20 69 73 20 6e 6f 72 |fy,.whic|h is nor|
|00001150| 6d 61 6c 6c 79 20 72 65 | 61 64 20 66 72 6f 6d 20 |mally re|ad from |
|00001160| 74 68 65 20 6d 69 6e 69 | 62 75 66 66 65 72 2e 0a |the mini|buffer..|
|00001170| 0a 50 72 65 66 69 78 20 | 61 72 67 20 6d 65 61 6e |.Prefix |arg mean|
|00001180| 73 20 74 68 65 20 6e 65 | 77 20 76 69 72 74 75 61 |s the ne|w virtua|
|00001190| 6c 20 66 6f 6c 64 65 72 | 20 73 68 6f 75 6c 64 20 |l folder| should |
|000011a0| 62 65 20 76 69 73 69 74 | 65 64 20 72 65 61 64 20 |be visit|ed read |
|000011b0| 6f 6e 6c 79 2e 22 20 28 | 62 79 74 65 2d 63 6f 64 |only." (|byte-cod|
|000011c0| 65 20 22 08 09 5c 6e 1b | 19 18 0c ab 8d c5 0c 21 |e "..\n.|.......!|
|000011d0| ac 85 c6 c7 21 ab 83 0c | 71 88 c8 c9 21 0b 43 a4 |....!...|q...!.C.|
|000011e0| 2b 87 22 20 5b 6c 61 73 | 74 2d 63 6f 6d 6d 61 6e |+." [las|t-comman|
|000011f0| 64 20 74 68 69 73 2d 63 | 6f 6d 6d 61 6e 64 20 63 |d this-c|ommand c|
|00001200| 75 72 72 65 6e 74 2d 70 | 72 65 66 69 78 2d 61 72 |urrent-p|refix-ar|
|00001210| 67 20 70 72 65 66 69 78 | 20 76 6d 2d 6d 61 69 6c |g prefix| vm-mail|
|00001220| 2d 62 75 66 66 65 72 20 | 62 75 66 66 65 72 2d 6e |-buffer |buffer-n|
|00001230| 61 6d 65 20 65 72 72 6f | 72 20 22 46 6f 6c 64 65 |ame erro|r "Folde|
|00001240| 72 20 62 75 66 66 65 72 | 20 68 61 73 20 62 65 65 |r buffer| has bee|
|00001250| 6e 20 6b 69 6c 6c 65 64 | 2e 22 20 76 6d 2d 72 65 |n killed|." vm-re|
|00001260| 61 64 2d 76 69 72 74 75 | 61 6c 2d 73 65 6c 65 63 |ad-virtu|al-selec|
|00001270| 74 6f 72 20 22 43 72 65 | 61 74 65 20 76 69 72 74 |tor "Cre|ate virt|
|00001280| 75 61 6c 20 66 6f 6c 64 | 65 72 20 6f 66 20 6d 65 |ual fold|er of me|
|00001290| 73 73 61 67 65 73 3a 20 | 22 5d 20 33 29 5d 29 0a |ssages: |"] 3)]).|
|000012a0| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 61 70 |(defalia|s 'vm-ap|
|000012b0| 70 6c 79 2d 76 69 72 74 | 75 61 6c 2d 66 6f 6c 64 |ply-virt|ual-fold|
|000012c0| 65 72 20 23 5b 28 6e 61 | 6d 65 20 26 6f 70 74 69 |er #[(na|me &opti|
|000012d0| 6f 6e 61 6c 20 72 65 61 | 64 2d 6f 6e 6c 79 29 20 |onal rea|d-only) |
|000012e0| 22 08 ab 8d c1 08 21 ac | 85 c2 c3 21 ab 83 08 71 |".....!.|...!...q|
|000012f0| 88 c4 20 88 c5 20 88 c6 | 0e 07 0e 08 5c 22 c9 89 |.. .. ..|....\"..|
|00001300| 1e 08 1e 5c 6e 89 1e 0b | ac 86 c2 cc 0e 07 5c 22 |...\n...|......\"|
|00001310| 88 cd 0e 0b 21 89 16 0b | 41 89 16 5c 6e ab 92 0e |....!...|A..\n...|
|00001320| 5c 6e 40 ce c1 20 44 43 | a0 88 0e 5c 6e 41 89 16 |\n@.. DC|...\nA..|
|00001330| 5c 6e ac 6e 0e 0b cf d0 | c1 20 0e 0b 40 23 a0 88 |\n.n....|. ..@#..|
|00001340| 0e 0b 43 16 08 d1 0e 0b | 40 0e 12 5c 22 88 2b 0e |..C.....|@..\".+.|
|00001350| 13 ad 82 d4 20 87 22 20 | 5b 76 6d 2d 6d 61 69 6c |.... ." |[vm-mail|
|00001360| 2d 62 75 66 66 65 72 20 | 62 75 66 66 65 72 2d 6e |-buffer |buffer-n|
|00001370| 61 6d 65 20 65 72 72 6f | 72 20 22 46 6f 6c 64 65 |ame erro|r "Folde|
|00001380| 72 20 62 75 66 66 65 72 | 20 68 61 73 20 62 65 65 |r buffer| has bee|
|00001390| 6e 20 6b 69 6c 6c 65 64 | 2e 22 20 76 6d 2d 63 68 |n killed|." vm-ch|
|000013a0| 65 63 6b 2d 66 6f 72 2d | 6b 69 6c 6c 65 64 2d 73 |eck-for-|killed-s|
|000013b0| 75 6d 6d 61 72 79 20 76 | 6d 2d 65 72 72 6f 72 2d |ummary v|m-error-|
|000013c0| 69 66 2d 66 6f 6c 64 65 | 72 2d 65 6d 70 74 79 20 |if-folde|r-empty |
|000013d0| 61 73 73 6f 63 20 6e 61 | 6d 65 20 76 6d 2d 76 69 |assoc na|me vm-vi|
|000013e0| 72 74 75 61 6c 2d 66 6f | 6c 64 65 72 2d 61 6c 69 |rtual-fo|lder-ali|
|000013f0| 73 74 20 6e 69 6c 20 63 | 6c 61 75 73 65 73 20 76 |st nil c|lauses v|
|00001400| 66 6f 6c 64 65 72 20 22 | 4e 6f 20 73 75 63 68 20 |folder "|No such |
|00001410| 76 69 72 74 75 61 6c 20 | 66 6f 6c 64 65 72 2c 20 |virtual |folder, |
|00001420| 25 73 22 20 76 6d 2d 63 | 6f 70 79 20 67 65 74 2d |%s" vm-c|opy get-|
|00001430| 62 75 66 66 65 72 20 66 | 6f 72 6d 61 74 20 22 25 |buffer f|ormat "%|
|00001440| 73 2f 25 73 22 20 76 6d | 2d 76 69 73 69 74 2d 76 |s/%s" vm|-visit-v|
|00001450| 69 72 74 75 61 6c 2d 66 | 6f 6c 64 65 72 20 72 65 |irtual-f|older re|
|00001460| 61 64 2d 6f 6e 6c 79 20 | 76 6d 2d 75 73 65 2d 6d |ad-only |vm-use-m|
|00001470| 65 6e 75 73 20 76 6d 2d | 6d 65 6e 75 2d 69 6e 73 |enus vm-|menu-ins|
|00001480| 74 61 6c 6c 2d 6b 6e 6f | 77 6e 2d 76 69 72 74 75 |tall-kno|wn-virtu|
|00001490| 61 6c 2d 66 6f 6c 64 65 | 72 73 2d 6d 65 6e 75 5d |al-folde|rs-menu]|
|000014a0| 20 36 20 22 5c 0a 41 70 | 70 6c 79 20 74 68 65 20 | 6 "\.Ap|ply the |
|000014b0| 73 65 6c 65 63 74 6f 72 | 73 20 6f 66 20 61 20 6e |selector|s of a n|
|000014c0| 61 6d 65 64 20 76 69 72 | 74 75 61 6c 20 66 6f 6c |amed vir|tual fol|
|000014d0| 64 65 72 20 74 6f 20 74 | 68 65 20 63 75 72 72 65 |der to t|he curre|
|000014e0| 6e 74 20 66 6f 6c 64 65 | 72 0a 61 6e 64 20 63 72 |nt folde|r.and cr|
|000014f0| 65 61 74 65 20 61 20 76 | 69 72 74 75 61 6c 20 66 |eate a v|irtual f|
|00001500| 6f 6c 64 65 72 20 63 6f | 6e 74 61 69 6e 69 6e 67 |older co|ntaining|
|00001510| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 20 6d 65 | the sel|ected me|
|00001520| 73 73 61 67 65 73 2e 0a | 0a 50 72 65 66 69 78 20 |ssages..|.Prefix |
|00001530| 61 72 67 20 6d 65 61 6e | 73 20 74 68 65 20 6e 65 |arg mean|s the ne|
|00001540| 77 20 76 69 72 74 75 61 | 6c 20 66 6f 6c 64 65 72 |w virtua|l folder|
|00001550| 20 73 68 6f 75 6c 64 20 | 62 65 20 76 69 73 69 74 | should |be visit|
|00001560| 65 64 20 72 65 61 64 20 | 6f 6e 6c 79 2e 22 20 28 |ed read |only." (|
|00001570| 6c 65 74 20 28 28 6c 61 | 73 74 2d 63 6f 6d 6d 61 |let ((la|st-comma|
|00001580| 6e 64 20 6c 61 73 74 2d | 63 6f 6d 6d 61 6e 64 29 |nd last-|command)|
|00001590| 20 28 74 68 69 73 2d 63 | 6f 6d 6d 61 6e 64 20 74 | (this-c|ommand t|
|000015a0| 68 69 73 2d 63 6f 6d 6d | 61 6e 64 29 29 20 28 6c |his-comm|and)) (l|
|000015b0| 69 73 74 20 28 63 6f 6d | 70 6c 65 74 69 6e 67 2d |ist (com|pleting-|
|000015c0| 72 65 61 64 20 22 41 70 | 70 6c 79 20 74 68 69 73 |read "Ap|ply this|
|000015d0| 20 76 69 72 74 75 61 6c | 20 66 6f 6c 64 65 72 27 | virtual| folder'|
|000015e0| 73 20 73 65 6c 65 63 74 | 6f 72 73 3a 20 22 20 76 |s select|ors: " v|
|000015f0| 6d 2d 76 69 72 74 75 61 | 6c 2d 66 6f 6c 64 65 72 |m-virtua|l-folder|
|00001600| 2d 61 6c 69 73 74 20 6e | 69 6c 20 74 29 20 63 75 |-alist n|il t) cu|
|00001610| 72 72 65 6e 74 2d 70 72 | 65 66 69 78 2d 61 72 67 |rrent-pr|efix-arg|
|00001620| 29 29 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |))]).(de|falias '|
|00001630| 76 6d 2d 63 72 65 61 74 | 65 2d 76 69 72 74 75 61 |vm-creat|e-virtua|
|00001640| 6c 2d 66 6f 6c 64 65 72 | 2d 73 61 6d 65 2d 73 75 |l-folder|-same-su|
|00001650| 62 6a 65 63 74 20 23 5b | 6e 69 6c 20 22 c0 20 88 |bject #[|nil ". .|
|00001660| 09 ab 8d c2 09 21 ac 85 | c3 c4 21 ab 83 09 71 88 |.....!..|..!...q.|
|00001670| c5 20 88 c6 20 88 c7 c8 | c9 ca 0e 0b 40 21 21 cc |. .. ...|....@!!.|
|00001680| cd ce c2 20 c8 ca 0e 0b | 40 21 24 24 87 22 20 5b |... ....|@!$$." [|
|00001690| 76 6d 2d 66 6f 6c 6c 6f | 77 2d 73 75 6d 6d 61 72 |vm-follo|w-summar|
|000016a0| 79 2d 63 75 72 73 6f 72 | 20 76 6d 2d 6d 61 69 6c |y-cursor| vm-mail|
|000016b0| 2d 62 75 66 66 65 72 20 | 62 75 66 66 65 72 2d 6e |-buffer |buffer-n|
|000016c0| 61 6d 65 20 65 72 72 6f | 72 20 22 46 6f 6c 64 65 |ame erro|r "Folde|
|000016d0| 72 20 62 75 66 66 65 72 | 20 68 61 73 20 62 65 65 |r buffer| has bee|
|000016e0| 6e 20 6b 69 6c 6c 65 64 | 2e 22 20 76 6d 2d 65 72 |n killed|." vm-er|
|000016f0| 72 6f 72 2d 69 66 2d 66 | 6f 6c 64 65 72 2d 65 6d |ror-if-f|older-em|
|00001700| 70 74 79 20 76 6d 2d 63 | 68 65 63 6b 2d 66 6f 72 |pty vm-c|heck-for|
|00001710| 2d 6b 69 6c 6c 65 64 2d | 73 75 6d 6d 61 72 79 20 |-killed-|summary |
|00001720| 76 6d 2d 63 72 65 61 74 | 65 2d 76 69 72 74 75 61 |vm-creat|e-virtua|
|00001730| 6c 2d 66 6f 6c 64 65 72 | 20 73 75 62 6a 65 63 74 |l-folder| subject|
|00001740| 20 72 65 67 65 78 70 2d | 71 75 6f 74 65 20 76 6d | regexp-|quote vm|
|00001750| 2d 73 6f 2d 73 6f 72 74 | 61 62 6c 65 2d 73 75 62 |-so-sort|able-sub|
|00001760| 6a 65 63 74 20 76 6d 2d | 6d 65 73 73 61 67 65 2d |ject vm-|message-|
|00001770| 70 6f 69 6e 74 65 72 20 | 6e 69 6c 20 66 6f 72 6d |pointer |nil form|
|00001780| 61 74 20 22 25 73 20 25 | 73 20 25 73 22 5d 20 31 |at "%s %|s %s"] 1|
|00001790| 30 20 6e 69 6c 20 6e 69 | 6c 5d 29 0a 28 64 65 66 |0 nil ni|l]).(def|
|000017a0| 61 6c 69 61 73 20 27 76 | 6d 2d 63 72 65 61 74 65 |alias 'v|m-create|
|000017b0| 2d 76 69 72 74 75 61 6c | 2d 66 6f 6c 64 65 72 2d |-virtual|-folder-|
|000017c0| 73 61 6d 65 2d 61 75 74 | 68 6f 72 20 23 5b 6e 69 |same-aut|hor #[ni|
|000017d0| 6c 20 22 c0 20 88 09 ab | 8d c2 09 21 ac 85 c3 c4 |l ". ...|...!....|
|000017e0| 21 ab 83 09 71 88 c5 20 | 88 c6 20 88 c7 c8 c9 ca |!...q.. |.. .....|
|000017f0| 0e 0b 40 21 21 cc cd ce | c2 20 c8 ca 0e 0b 40 21 |..@!!...|. ....@!|
|00001800| 24 24 87 22 20 5b 76 6d | 2d 66 6f 6c 6c 6f 77 2d |$$." [vm|-follow-|
|00001810| 73 75 6d 6d 61 72 79 2d | 63 75 72 73 6f 72 20 76 |summary-|cursor v|
|00001820| 6d 2d 6d 61 69 6c 2d 62 | 75 66 66 65 72 20 62 75 |m-mail-b|uffer bu|
|00001830| 66 66 65 72 2d 6e 61 6d | 65 20 65 72 72 6f 72 20 |ffer-nam|e error |
|00001840| 22 46 6f 6c 64 65 72 20 | 62 75 66 66 65 72 20 68 |"Folder |buffer h|
|00001850| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|00001860| 20 76 6d 2d 65 72 72 6f | 72 2d 69 66 2d 66 6f 6c | vm-erro|r-if-fol|
|00001870| 64 65 72 2d 65 6d 70 74 | 79 20 76 6d 2d 63 68 65 |der-empt|y vm-che|
|00001880| 63 6b 2d 66 6f 72 2d 6b | 69 6c 6c 65 64 2d 73 75 |ck-for-k|illed-su|
|00001890| 6d 6d 61 72 79 20 76 6d | 2d 63 72 65 61 74 65 2d |mmary vm|-create-|
|000018a0| 76 69 72 74 75 61 6c 2d | 66 6f 6c 64 65 72 20 61 |virtual-|folder a|
|000018b0| 75 74 68 6f 72 20 72 65 | 67 65 78 70 2d 71 75 6f |uthor re|gexp-quo|
|000018c0| 74 65 20 76 6d 2d 73 75 | 2d 66 72 6f 6d 20 76 6d |te vm-su|-from vm|
|000018d0| 2d 6d 65 73 73 61 67 65 | 2d 70 6f 69 6e 74 65 72 |-message|-pointer|
|000018e0| 20 6e 69 6c 20 66 6f 72 | 6d 61 74 20 22 25 73 20 | nil for|mat "%s |
|000018f0| 25 73 20 25 73 22 5d 20 | 31 30 20 6e 69 6c 20 6e |%s %s"] |10 nil n|
|00001900| 69 6c 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |il]).(de|falias '|
|00001910| 76 6d 2d 74 6f 67 67 6c | 65 2d 76 69 72 74 75 61 |vm-toggl|e-virtua|
|00001920| 6c 2d 6d 69 72 72 6f 72 | 20 23 5b 6e 69 6c 20 22 |l-mirror| #[nil "|
|00001930| 08 ab 8d c1 08 21 ac 85 | c2 c3 21 ab 83 08 71 88 |.....!..|..!...q.|
|00001940| c4 20 88 0d c6 61 ac 84 | c2 c7 21 88 0e 08 c9 ca |. ...a..|..!.....|
|00001950| 89 1e 0b 1e 0c 1e 0d 1e | 0e 0e 0f 16 0b 0e 10 16 |........|........|
|00001960| 0f 0e 0b 16 10 0e 0b 16 | 11 0e 12 16 0c d3 20 16 |........|...... .|
|00001970| 12 d4 0e 0c 21 88 0e 15 | ab bc 0e 0e 83 d3 00 0e |....!...|........|
|00001980| 0e 40 d6 0e 0e 40 d7 48 | d8 48 ae 85 d9 0e 1a ca |.@...@.H|.H......|
|00001990| 5c 22 49 88 0e 0e 40 db | 0e 0e 40 d7 48 dc 48 ae |\"I...@.|..@.H.H.|
|000019a0| 85 d9 0e 1d ca 5c 22 49 | 88 de 0e 0e 40 c9 5c 22 |.....\"I|....@.\"|
|000019b0| 88 0e 0e 41 89 16 0e aa | 46 0e 0e ab c9 de 0e 0e |...A....|F.......|
|000019c0| 40 c9 5c 22 88 0e 0e 40 | d7 48 d8 0e 0e 40 d6 48 |@.\"...@|.H...@.H|
|000019d0| 49 88 0e 0e 40 d7 48 dc | 0e 0e 40 db 48 49 88 0e |I...@.H.|..@.HI..|
|000019e0| 0e 40 d6 0e 0e 40 d7 48 | df 48 4a d6 48 49 88 0e |.@...@.H|.HJ.HI..|
|000019f0| 0e 40 db 0e 0e 40 d7 48 | df 48 4a db 48 49 88 0e |.@...@.H|.HJ.HI..|
|00001a00| 0e 41 89 16 0e ac 37 0e | 15 3f 16 15 0e 20 54 16 |.A....7.|.?... T.|
|00001a10| 20 2c e1 20 88 e2 e3 0e | 15 ab 83 e4 aa 81 e5 0e | ,. ....|........|
|00001a20| 26 41 ab 83 e7 aa 81 e8 | 23 87 22 20 5b 76 6d 2d |&A......|#." [vm-|
|00001a30| 6d 61 69 6c 2d 62 75 66 | 66 65 72 20 62 75 66 66 |mail-buf|fer buff|
|00001a40| 65 72 2d 6e 61 6d 65 20 | 65 72 72 6f 72 20 22 46 |er-name |error "F|
|00001a50| 6f 6c 64 65 72 20 62 75 | 66 66 65 72 20 68 61 73 |older bu|ffer has|
|00001a60| 20 62 65 65 6e 20 6b 69 | 6c 6c 65 64 2e 22 20 76 | been ki|lled." v|
|00001a70| 6d 2d 63 68 65 63 6b 2d | 66 6f 72 2d 6b 69 6c 6c |m-check-|for-kill|
|00001a80| 65 64 2d 73 75 6d 6d 61 | 72 79 20 6d 61 6a 6f 72 |ed-summa|ry major|
|00001a90| 2d 6d 6f 64 65 20 76 6d | 2d 76 69 72 74 75 61 6c |-mode vm|-virtual|
|00001aa0| 2d 6d 6f 64 65 20 22 54 | 68 69 73 20 69 73 20 6e |-mode "T|his is n|
|00001ab0| 6f 74 20 61 20 76 69 72 | 74 75 61 6c 20 66 6f 6c |ot a vir|tual fol|
|00001ac0| 64 65 72 2e 22 20 76 6d | 2d 6d 65 73 73 61 67 65 |der." vm|-message|
|00001ad0| 2d 6c 69 73 74 20 74 20 | 6e 69 6c 20 75 6e 64 6f |-list t |nil undo|
|00001ae0| 2d 6c 69 73 74 20 6d 6f | 64 69 66 69 65 64 20 69 |-list mo|dified i|
|00001af0| 6e 68 69 62 69 74 2d 71 | 75 69 74 20 6d 70 20 76 |nhibit-q|uit mp v|
|00001b00| 6d 2d 73 61 76 65 64 2d | 75 6e 64 6f 2d 72 65 63 |m-saved-|undo-rec|
|00001b10| 6f 72 64 2d 6c 69 73 74 | 20 76 6d 2d 75 6e 64 6f |ord-list| vm-undo|
|00001b20| 2d 72 65 63 6f 72 64 2d | 6c 69 73 74 20 76 6d 2d |-record-|list vm-|
|00001b30| 75 6e 64 6f 2d 72 65 63 | 6f 72 64 2d 70 6f 69 6e |undo-rec|ord-poin|
|00001b40| 74 65 72 20 76 6d 2d 73 | 61 76 65 64 2d 62 75 66 |ter vm-s|aved-buf|
|00001b50| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 62 |fer-modi|fied-p b|
|00001b60| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|00001b70| 20 73 65 74 2d 62 75 66 | 66 65 72 2d 6d 6f 64 69 | set-buf|fer-modi|
|00001b80| 66 69 65 64 2d 70 20 76 | 6d 2d 76 69 72 74 75 61 |fied-p v|m-virtua|
|00001b90| 6c 2d 6d 69 72 72 6f 72 | 20 32 20 31 20 31 33 20 |l-mirror| 2 1 13 |
|00001ba0| 6d 61 6b 65 2d 76 65 63 | 74 6f 72 20 76 6d 2d 61 |make-vec|tor vm-a|
|00001bb0| 74 74 72 69 62 75 74 65 | 73 2d 76 65 63 74 6f 72 |ttribute|s-vector|
|00001bc0| 2d 6c 65 6e 67 74 68 20 | 34 20 31 34 20 76 6d 2d |-length |4 14 vm-|
|00001bd0| 6d 69 72 72 6f 72 2d 64 | 61 74 61 2d 76 65 63 74 |mirror-d|ata-vect|
|00001be0| 6f 72 2d 6c 65 6e 67 74 | 68 20 76 6d 2d 6d 61 72 |or-lengt|h vm-mar|
|00001bf0| 6b 2d 66 6f 72 2d 73 75 | 6d 6d 61 72 79 2d 75 70 |k-for-su|mmary-up|
|00001c00| 64 61 74 65 20 35 20 76 | 6d 2d 6d 6f 64 69 66 69 |date 5 v|m-modifi|
|00001c10| 63 61 74 69 6f 6e 2d 63 | 6f 75 6e 74 65 72 20 76 |cation-c|ounter v|
|00001c20| 6d 2d 75 70 64 61 74 65 | 2d 73 75 6d 6d 61 72 79 |m-update|-summary|
|00001c30| 2d 61 6e 64 2d 6d 6f 64 | 65 2d 6c 69 6e 65 20 6d |-and-mod|e-line m|
|00001c40| 65 73 73 61 67 65 20 22 | 56 69 72 74 75 61 6c 20 |essage "|Virtual |
|00001c50| 66 6f 6c 64 65 72 20 6e | 6f 77 20 25 73 20 74 68 |folder n|ow %s th|
|00001c60| 65 20 75 6e 64 65 72 6c | 79 69 6e 67 20 72 65 61 |e underl|ying rea|
|00001c70| 6c 20 66 6f 6c 64 65 72 | 25 73 2e 22 20 22 6d 69 |l folder|%s." "mi|
|00001c80| 72 72 6f 72 73 22 20 22 | 64 6f 65 73 20 6e 6f 74 |rrors" "|does not|
|00001c90| 20 6d 69 72 72 6f 72 22 | 20 76 6d 2d 72 65 61 6c | mirror"| vm-real|
|00001ca0| 2d 62 75 66 66 65 72 73 | 20 22 73 22 20 22 22 5d |-buffers| "s" ""]|
|00001cb0| 20 36 20 6e 69 6c 20 6e | 69 6c 5d 29 0a 28 64 65 | 6 nil n|il]).(de|
|00001cc0| 66 61 6c 69 61 73 20 27 | 76 6d 2d 76 69 72 74 75 |falias '|vm-virtu|
|00001cd0| 61 6c 2d 68 65 6c 70 20 | 23 5b 6e 69 6c 20 22 c0 |al-help |#[nil ".|
|00001ce0| c1 89 c2 c3 24 88 c4 c5 | 21 87 22 20 5b 76 6d 2d |....$...|!." [vm-|
|00001cf0| 64 69 73 70 6c 61 79 20 | 6e 69 6c 20 28 76 6d 2d |display |nil (vm-|
|00001d00| 76 69 72 74 75 61 6c 2d | 68 65 6c 70 29 20 28 76 |virtual-|help) (v|
|00001d10| 6d 2d 76 69 72 74 75 61 | 6c 2d 68 65 6c 70 29 20 |m-virtua|l-help) |
|00001d20| 6d 65 73 73 61 67 65 20 | 22 56 56 20 3d 20 76 69 |message |"VV = vi|
|00001d30| 73 69 74 2c 20 56 58 20 | 3d 20 61 70 70 6c 79 20 |sit, VX |= apply |
|00001d40| 73 65 6c 65 63 74 6f 72 | 73 2c 20 56 43 20 3d 20 |selector|s, VC = |
|00001d50| 63 72 65 61 74 65 2c 20 | 56 4d 20 3d 20 74 6f 67 |create, |VM = tog|
|00001d60| 67 6c 65 20 76 69 72 74 | 75 61 6c 20 6d 69 72 72 |gle virt|ual mirr|
|00001d70| 6f 72 22 5d 20 35 20 6e | 69 6c 20 6e 69 6c 5d 29 |or"] 5 n|il nil])|
|00001d80| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 76 6d 2d 76 |.(defali|as 'vm-v|
|00001d90| 73 2d 6f 72 20 23 5b 28 | 6d 20 26 72 65 73 74 20 |s-or #[(|m &rest |
|00001da0| 73 65 6c 65 63 74 6f 72 | 73 29 20 22 c0 89 89 19 |selector|s) "....|
|00001db0| 1a 1b 0c ab 9d 0c 40 40 | 12 0c 40 41 11 c5 5c 6e |......@@|..@A..\n|
|00001dc0| 0e 06 b7 41 0e 07 09 23 | 89 13 3f ad 82 0c 41 89 |...A...#|..?...A.|
|00001dd0| 14 ac 63 0b 2b 87 22 20 | 5b 6e 69 6c 20 61 72 67 |..c.+." |[nil arg|
|00001de0| 6c 69 73 74 20 73 65 6c | 65 63 74 6f 72 20 72 65 |list sel|ector re|
|00001df0| 73 75 6c 74 20 73 65 6c | 65 63 74 6f 72 73 20 61 |sult sel|ectors a|
|00001e00| 70 70 6c 79 20 76 6d 2d | 76 69 72 74 75 61 6c 2d |pply vm-|virtual-|
|00001e10| 73 65 6c 65 63 74 6f 72 | 2d 66 75 6e 63 74 69 6f |selector|-functio|
|00001e20| 6e 2d 61 6c 69 73 74 20 | 6d 5d 20 35 5d 29 0a 28 |n-alist |m] 5]).(|
|00001e30| 64 65 66 61 6c 69 61 73 | 20 27 76 6d 2d 76 73 2d |defalias| 'vm-vs-|
|00001e40| 61 6e 64 20 23 5b 28 6d | 20 26 72 65 73 74 20 73 |and #[(m| &rest s|
|00001e50| 65 6c 65 63 74 6f 72 73 | 29 20 22 c0 c1 89 1a 1b |electors|) ".....|
|00001e60| 1c 0d ab 9c 0d 40 40 13 | 0d 40 41 12 c6 0b 0e 07 |.....@@.|.@A.....|
|00001e70| b7 41 0e 08 5c 6e 23 89 | 14 ad 82 0d 41 89 15 ac |.A..\n#.|....A...|
|00001e80| 64 0c 2b 87 22 20 5b 74 | 20 6e 69 6c 20 61 72 67 |d.+." [t| nil arg|
|00001e90| 6c 69 73 74 20 73 65 6c | 65 63 74 6f 72 20 72 65 |list sel|ector re|
|00001ea0| 73 75 6c 74 20 73 65 6c | 65 63 74 6f 72 73 20 61 |sult sel|ectors a|
|00001eb0| 70 70 6c 79 20 76 6d 2d | 76 69 72 74 75 61 6c 2d |pply vm-|virtual-|
|00001ec0| 73 65 6c 65 63 74 6f 72 | 2d 66 75 6e 63 74 69 6f |selector|-functio|
|00001ed0| 6e 2d 61 6c 69 73 74 20 | 6d 5d 20 35 5d 29 0a 28 |n-alist |m] 5]).(|
|00001ee0| 64 65 66 61 6c 69 61 73 | 20 27 76 6d 2d 76 73 2d |defalias| 'vm-vs-|
|00001ef0| 6e 6f 74 20 23 5b 28 6d | 20 61 72 67 29 20 22 08 |not #[(m| arg) ".|
|00001f00| 40 08 41 19 1a c3 5c 6e | 4a 0c 09 23 2a 3f 87 22 |@.A...\n|J..#*?."|
|00001f10| 20 5b 61 72 67 20 61 72 | 67 6c 69 73 74 20 73 65 | [arg ar|glist se|
|00001f20| 6c 65 63 74 6f 72 20 61 | 70 70 6c 79 20 6d 5d 20 |lector a|pply m] |
|00001f30| 34 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |4]).(def|alias 'v|
|00001f40| 6d 2d 76 73 2d 61 6e 79 | 20 23 5b 28 6d 29 20 22 |m-vs-any| #[(m) "|
|00001f50| c0 87 22 20 5b 74 5d 20 | 31 5d 29 0a 28 64 65 66 |.." [t] |1]).(def|
|00001f60| 61 6c 69 61 73 20 27 76 | 6d 2d 76 73 2d 61 75 74 |alias 'v|m-vs-aut|
|00001f70| 68 6f 72 20 23 5b 28 6d | 20 61 72 67 29 20 22 c0 |hor #[(m| arg) ".|
|00001f80| 09 c2 0b 21 5c 22 ae 86 | c0 09 c4 0b 21 5c 22 87 |...!\"..|....!\".|
|00001f90| 22 20 5b 73 74 72 69 6e | 67 2d 6d 61 74 63 68 20 |" [strin|g-match |
|00001fa0| 61 72 67 20 76 6d 2d 73 | 75 2d 66 75 6c 6c 2d 6e |arg vm-s|u-full-n|
|00001fb0| 61 6d 65 20 6d 20 76 6d | 2d 73 75 2d 66 72 6f 6d |ame m vm|-su-from|
|00001fc0| 5d 20 34 5d 29 0a 28 66 | 73 65 74 20 27 76 6d 2d |] 4]).(f|set 'vm-|
|00001fd0| 76 73 2d 73 65 6e 64 65 | 72 20 27 76 6d 2d 76 73 |vs-sende|r 'vm-vs|
|00001fe0| 2d 61 75 74 68 6f 72 29 | 0a 28 64 65 66 61 6c 69 |-author)|.(defali|
|00001ff0| 61 73 20 27 76 6d 2d 76 | 73 2d 72 65 63 69 70 69 |as 'vm-v|s-recipi|
|00002000| 65 6e 74 20 23 5b 28 6d | 20 61 72 67 29 20 22 c0 |ent #[(m| arg) ".|
|00002010| 09 c2 0b 21 5c 22 ae 86 | c0 09 c4 0b 21 5c 22 87 |...!\"..|....!\".|
|00002020| 22 20 5b 73 74 72 69 6e | 67 2d 6d 61 74 63 68 20 |" [strin|g-match |
|00002030| 61 72 67 20 76 6d 2d 73 | 75 2d 74 6f 20 6d 20 76 |arg vm-s|u-to m v|
|00002040| 6d 2d 73 75 2d 74 6f 2d | 6e 61 6d 65 73 5d 20 34 |m-su-to-|names] 4|
|00002050| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|00002060| 2d 76 73 2d 61 75 74 68 | 6f 72 2d 6f 72 2d 72 65 |-vs-auth|or-or-re|
|00002070| 63 69 70 69 65 6e 74 20 | 23 5b 28 6d 20 61 72 67 |cipient |#[(m arg|
|00002080| 29 20 22 c0 09 5c 6e 5c | 22 ae 84 c3 09 5c 6e 5c |) "..\n\|"....\n\|
|00002090| 22 87 22 20 5b 76 6d 2d | 76 73 2d 61 75 74 68 6f |"." [vm-|vs-autho|
|000020a0| 72 20 6d 20 61 72 67 20 | 76 6d 2d 76 73 2d 72 65 |r m arg |vm-vs-re|
|000020b0| 63 69 70 69 65 6e 74 5d | 20 33 5d 29 0a 28 66 73 |cipient]| 3]).(fs|
|000020c0| 65 74 20 27 76 6d 2d 76 | 73 2d 73 65 6e 64 65 72 |et 'vm-v|s-sender|
|000020d0| 2d 6f 72 2d 72 65 63 69 | 70 69 65 6e 74 20 27 76 |-or-reci|pient 'v|
|000020e0| 6d 2d 76 73 2d 61 75 74 | 68 6f 72 2d 6f 72 2d 72 |m-vs-aut|hor-or-r|
|000020f0| 65 63 69 70 69 65 6e 74 | 29 0a 28 64 65 66 61 6c |ecipient|).(defal|
|00002100| 69 61 73 20 27 76 6d 2d | 76 73 2d 73 75 62 6a 65 |ias 'vm-|vs-subje|
|00002110| 63 74 20 23 5b 28 6d 20 | 61 72 67 29 20 22 c0 09 |ct #[(m |arg) "..|
|00002120| c2 0b 21 5c 22 87 22 20 | 5b 73 74 72 69 6e 67 2d |..!\"." |[string-|
|00002130| 6d 61 74 63 68 20 61 72 | 67 20 76 6d 2d 73 75 2d |match ar|g vm-su-|
|00002140| 73 75 62 6a 65 63 74 20 | 6d 5d 20 34 5d 29 0a 28 |subject |m] 4]).(|
|00002150| 64 65 66 61 6c 69 61 73 | 20 27 76 6d 2d 76 73 2d |defalias| 'vm-vs-|
|00002160| 73 65 6e 74 2d 62 65 66 | 6f 72 65 20 23 5b 28 6d |sent-bef|ore #[(m|
|00002170| 20 61 72 67 29 20 22 c0 | 09 21 c2 0b 21 99 87 22 | arg) ".|.!..!.."|
|00002180| 20 5b 76 6d 2d 73 6f 2d | 73 6f 72 74 61 62 6c 65 | [vm-so-|sortable|
|00002190| 2d 64 61 74 65 73 74 72 | 69 6e 67 20 6d 20 76 6d |-datestr|ing m vm|
|000021a0| 2d 74 69 6d 65 7a 6f 6e | 65 2d 6d 61 6b 65 2d 64 |-timezon|e-make-d|
|000021b0| 61 74 65 2d 73 6f 72 74 | 61 62 6c 65 20 61 72 67 |ate-sort|able arg|
|000021c0| 5d 20 33 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 3]).(d|efalias |
|000021d0| 27 76 6d 2d 76 73 2d 73 | 65 6e 74 2d 61 66 74 65 |'vm-vs-s|ent-afte|
|000021e0| 72 20 23 5b 28 6d 20 61 | 72 67 29 20 22 c0 09 21 |r #[(m a|rg) "..!|
|000021f0| c2 0b 21 99 87 22 20 5b | 76 6d 2d 74 69 6d 65 7a |..!.." [|vm-timez|
|00002200| 6f 6e 65 2d 6d 61 6b 65 | 2d 64 61 74 65 2d 73 6f |one-make|-date-so|
|00002210| 72 74 61 62 6c 65 20 61 | 72 67 20 76 6d 2d 73 6f |rtable a|rg vm-so|
|00002220| 2d 73 6f 72 74 61 62 6c | 65 2d 64 61 74 65 73 74 |-sortabl|e-datest|
|00002230| 72 69 6e 67 20 6d 5d 20 | 33 5d 29 0a 28 64 65 66 |ring m] |3]).(def|
|00002240| 61 6c 69 61 73 20 27 76 | 6d 2d 76 73 2d 68 65 61 |alias 'v|m-vs-hea|
|00002250| 64 65 72 20 23 5b 28 6d | 20 61 72 67 29 20 22 8a |der #[(m| arg) ".|
|00002260| 8c 7e 88 08 c1 48 c2 48 | 4a c3 48 c1 48 62 88 c4 |.~...H.H|J.H.Hb..|
|00002270| 0d c6 08 c1 48 c2 48 4a | 21 c7 23 2a 87 22 20 5b |....H.HJ|!.#*." [|
|00002280| 6d 20 31 20 35 20 30 20 | 72 65 2d 73 65 61 72 63 |m 1 5 0 |re-searc|
|00002290| 68 2d 66 6f 72 77 61 72 | 64 20 61 72 67 20 76 6d |h-forwar|d arg vm|
|000022a0| 2d 74 65 78 74 2d 6f 66 | 20 74 5d 20 35 5d 29 0a |-text-of| t] 5]).|
|000022b0| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 76 73 |(defalia|s 'vm-vs|
|000022c0| 2d 6c 61 62 65 6c 20 23 | 5b 28 6d 20 61 72 67 29 |-label #|[(m arg)|
|000022d0| 20 22 c0 09 5c 6e c3 48 | c4 48 5c 22 87 22 20 5b | "..\n.H|.H\"." [|
|000022e0| 76 6d 2d 6d 65 6d 62 65 | 72 20 61 72 67 20 6d 20 |vm-membe|r arg m |
|000022f0| 34 20 33 5d 20 34 5d 29 | 0a 28 64 65 66 61 6c 69 |4 3] 4])|.(defali|
|00002300| 61 73 20 27 76 6d 2d 76 | 73 2d 74 65 78 74 20 23 |as 'vm-v|s-text #|
|00002310| 5b 28 6d 20 61 72 67 29 | 20 22 8a 8c 7e 88 c0 09 |[(m arg)| "..~...|
|00002320| c2 48 c3 48 4a 21 62 88 | c4 0d 09 c2 48 c3 48 4a |.H.HJ!b.|....H.HJ|
|00002330| c6 48 c7 48 c8 23 2a 87 | 22 20 5b 76 6d 2d 74 65 |.H.H.#*.|" [vm-te|
|00002340| 78 74 2d 6f 66 20 6d 20 | 31 20 35 20 72 65 2d 73 |xt-of m |1 5 re-s|
|00002350| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 61 72 |earch-fo|rward ar|
|00002360| 67 20 30 20 34 20 74 5d | 20 34 5d 29 0a 28 64 65 |g 0 4 t]| 4]).(de|
|00002370| 66 61 6c 69 61 73 20 27 | 76 6d 2d 76 73 2d 68 65 |falias '|vm-vs-he|
|00002380| 61 64 65 72 2d 6f 72 2d | 74 65 78 74 20 23 5b 28 |ader-or-|text #[(|
|00002390| 6d 20 61 72 67 29 20 22 | 8a 8c 7e 88 08 c1 48 c2 |m arg) "|..~...H.|
|000023a0| 48 4a c3 48 c1 48 62 88 | c4 0d 08 c1 48 c2 48 4a |HJ.H.Hb.|....H.HJ|
|000023b0| c3 48 c6 48 c7 23 2a 87 | 22 20 5b 6d 20 31 20 35 |.H.H.#*.|" [m 1 5|
|000023c0| 20 30 20 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 | 0 re-se|arch-for|
|000023d0| 77 61 72 64 20 61 72 67 | 20 34 20 74 5d 20 34 5d |ward arg| 4 t] 4]|
|000023e0| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 76 6d 2d |).(defal|ias 'vm-|
|000023f0| 76 73 2d 6d 6f 72 65 2d | 63 68 61 72 73 2d 74 68 |vs-more-|chars-th|
|00002400| 61 6e 20 23 5b 28 6d 20 | 61 72 67 29 20 22 c0 c1 |an #[(m |arg) "..|
|00002410| 5c 6e 21 21 0b 56 87 22 | 20 5b 73 74 72 69 6e 67 |\n!!.V."| [string|
|00002420| 2d 74 6f 2d 69 6e 74 20 | 76 6d 2d 73 75 2d 62 79 |-to-int |vm-su-by|
|00002430| 74 65 2d 63 6f 75 6e 74 | 20 6d 20 61 72 67 5d 20 |te-count| m arg] |
|00002440| 33 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |3]).(def|alias 'v|
|00002450| 6d 2d 76 73 2d 6c 65 73 | 73 2d 63 68 61 72 73 2d |m-vs-les|s-chars-|
|00002460| 74 68 61 6e 20 23 5b 28 | 6d 20 61 72 67 29 20 22 |than #[(|m arg) "|
|00002470| c0 c1 5c 6e 21 21 0b 57 | 87 22 20 5b 73 74 72 69 |..\n!!.W|." [stri|
|00002480| 6e 67 2d 74 6f 2d 69 6e | 74 20 76 6d 2d 73 75 2d |ng-to-in|t vm-su-|
|00002490| 62 79 74 65 2d 63 6f 75 | 6e 74 20 6d 20 61 72 67 |byte-cou|nt m arg|
|000024a0| 5d 20 33 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 3]).(d|efalias |
|000024b0| 27 76 6d 2d 76 73 2d 6d | 6f 72 65 2d 6c 69 6e 65 |'vm-vs-m|ore-line|
|000024c0| 73 2d 74 68 61 6e 20 23 | 5b 28 6d 20 61 72 67 29 |s-than #|[(m arg)|
|000024d0| 20 22 c0 c1 5c 6e 21 21 | 0b 56 87 22 20 5b 73 74 | "..\n!!|.V." [st|
|000024e0| 72 69 6e 67 2d 74 6f 2d | 69 6e 74 20 76 6d 2d 73 |ring-to-|int vm-s|
|000024f0| 75 2d 6c 69 6e 65 2d 63 | 6f 75 6e 74 20 6d 20 61 |u-line-c|ount m a|
|00002500| 72 67 5d 20 33 5d 29 0a | 28 64 65 66 61 6c 69 61 |rg] 3]).|(defalia|
|00002510| 73 20 27 76 6d 2d 76 73 | 2d 6c 65 73 73 2d 6c 69 |s 'vm-vs|-less-li|
|00002520| 6e 65 73 2d 74 68 61 6e | 20 23 5b 28 6d 20 61 72 |nes-than| #[(m ar|
|00002530| 67 29 20 22 c0 c1 5c 6e | 21 21 0b 57 87 22 20 5b |g) "..\n|!!.W." [|
|00002540| 73 74 72 69 6e 67 2d 74 | 6f 2d 69 6e 74 20 76 6d |string-t|o-int vm|
|00002550| 2d 73 75 2d 6c 69 6e 65 | 2d 63 6f 75 6e 74 20 6d |-su-line|-count m|
|00002560| 20 61 72 67 5d 20 33 5d | 29 0a 28 64 65 66 61 6c | arg] 3]|).(defal|
|00002570| 69 61 73 20 27 76 6d 2d | 76 73 2d 6e 65 77 20 23 |ias 'vm-|vs-new #|
|00002580| 5b 28 6d 29 20 22 08 c1 | 48 c2 48 87 22 20 5b 6d |[(m) "..|H.H." [m|
|00002590| 20 32 20 30 5d 20 32 5d | 29 0a 28 66 73 65 74 20 | 2 0] 2]|).(fset |
|000025a0| 27 76 6d 2d 76 73 2d 72 | 65 63 65 6e 74 20 27 76 |'vm-vs-r|ecent 'v|
|000025b0| 6d 2d 76 73 2d 6e 65 77 | 29 0a 28 64 65 66 61 6c |m-vs-new|).(defal|
|000025c0| 69 61 73 20 27 76 6d 2d | 76 73 2d 75 6e 72 65 61 |ias 'vm-|vs-unrea|
|000025d0| 64 20 23 5b 28 6d 29 20 | 22 08 c1 48 c2 48 87 22 |d #[(m) |"..H.H."|
|000025e0| 20 5b 6d 20 32 20 31 5d | 20 32 5d 29 0a 28 66 73 | [m 2 1]| 2]).(fs|
|000025f0| 65 74 20 27 76 6d 2d 76 | 73 2d 75 6e 73 65 65 6e |et 'vm-v|s-unseen|
|00002600| 20 27 76 6d 2d 76 73 2d | 75 6e 72 65 61 64 29 0a | 'vm-vs-|unread).|
|00002610| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 76 73 |(defalia|s 'vm-vs|
|00002620| 2d 72 65 61 64 20 23 5b | 28 6d 29 20 22 08 c1 48 |-read #[|(m) "..H|
|00002630| c2 48 ae 85 08 c1 48 c3 | 48 3f 87 22 20 5b 6d 20 |.H....H.|H?." [m |
|00002640| 32 20 30 20 31 5d 20 32 | 5d 29 0a 28 64 65 66 61 |2 0 1] 2|]).(defa|
|00002650| 6c 69 61 73 20 27 76 6d | 2d 76 73 2d 64 65 6c 65 |lias 'vm|-vs-dele|
|00002660| 74 65 64 20 23 5b 28 6d | 29 20 22 08 c1 48 c1 48 |ted #[(m|) "..H.H|
|00002670| 87 22 20 5b 6d 20 32 5d | 20 32 5d 29 0a 28 64 65 |." [m 2]| 2]).(de|
|00002680| 66 61 6c 69 61 73 20 27 | 76 6d 2d 76 73 2d 72 65 |falias '|vm-vs-re|
|00002690| 70 6c 69 65 64 20 23 5b | 28 6d 29 20 22 08 c1 48 |plied #[|(m) "..H|
|000026a0| c2 48 87 22 20 5b 6d 20 | 32 20 34 5d 20 32 5d 29 |.H." [m |2 4] 2])|
|000026b0| 0a 28 66 73 65 74 20 27 | 76 6d 2d 76 73 2d 61 6e |.(fset '|vm-vs-an|
|000026c0| 73 77 65 72 65 64 20 27 | 76 6d 2d 76 73 2d 72 65 |swered '|vm-vs-re|
|000026d0| 70 6c 69 65 64 29 0a 28 | 64 65 66 61 6c 69 61 73 |plied).(|defalias|
|000026e0| 20 27 76 6d 2d 76 73 2d | 66 6f 72 77 61 72 64 65 | 'vm-vs-|forwarde|
|000026f0| 64 20 23 5b 28 6d 29 20 | 22 08 c1 48 c2 48 87 22 |d #[(m) |"..H.H."|
|00002700| 20 5b 6d 20 32 20 36 5d | 20 32 5d 29 0a 28 64 65 | [m 2 6]| 2]).(de|
|00002710| 66 61 6c 69 61 73 20 27 | 76 6d 2d 76 73 2d 72 65 |falias '|vm-vs-re|
|00002720| 64 69 73 74 72 69 62 75 | 74 65 64 20 23 5b 28 6d |distribu|ted #[(m|
|00002730| 29 20 22 08 c1 48 c2 48 | 87 22 20 5b 6d 20 32 20 |) "..H.H|." [m 2 |
|00002740| 38 5d 20 32 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |8] 2]).(|defalias|
|00002750| 20 27 76 6d 2d 76 73 2d | 66 69 6c 65 64 20 23 5b | 'vm-vs-|filed #[|
|00002760| 28 6d 29 20 22 08 c1 48 | c2 48 87 22 20 5b 6d 20 |(m) "..H|.H." [m |
|00002770| 32 20 33 5d 20 32 5d 29 | 0a 28 64 65 66 61 6c 69 |2 3] 2])|.(defali|
|00002780| 61 73 20 27 76 6d 2d 76 | 73 2d 77 72 69 74 74 65 |as 'vm-v|s-writte|
|00002790| 6e 20 23 5b 28 6d 29 20 | 22 08 c1 48 c2 48 87 22 |n #[(m) |"..H.H."|
|000027a0| 20 5b 6d 20 32 20 35 5d | 20 32 5d 29 0a 28 64 65 | [m 2 5]| 2]).(de|
|000027b0| 66 61 6c 69 61 73 20 27 | 76 6d 2d 76 73 2d 6d 61 |falias '|vm-vs-ma|
|000027c0| 72 6b 65 64 20 23 5b 28 | 6d 29 20 22 08 c1 48 c2 |rked #[(|m) "..H.|
|000027d0| 48 87 22 20 5b 6d 20 31 | 20 32 5d 20 32 5d 29 0a |H." [m 1| 2] 2]).|
|000027e0| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 76 73 |(defalia|s 'vm-vs|
|000027f0| 2d 65 64 69 74 65 64 20 | 23 5b 28 6d 29 20 22 08 |-edited |#[(m) ".|
|00002800| c1 48 c2 48 87 22 20 5b | 6d 20 32 20 37 5d 20 32 |.H.H." [|m 2 7] 2|
|00002810| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|00002820| 2d 76 73 2d 75 6e 64 65 | 6c 65 74 65 64 20 23 5b |-vs-unde|leted #[|
|00002830| 28 6d 29 20 22 08 c1 48 | c1 48 3f 87 22 20 5b 6d |(m) "..H|.H?." [m|
|00002840| 20 32 5d 20 32 5d 29 0a | 28 64 65 66 61 6c 69 61 | 2] 2]).|(defalia|
|00002850| 73 20 27 76 6d 2d 76 73 | 2d 75 6e 72 65 70 6c 69 |s 'vm-vs|-unrepli|
|00002860| 65 64 20 23 5b 28 6d 29 | 20 22 08 c1 48 c2 48 3f |ed #[(m)| "..H.H?|
|00002870| 87 22 20 5b 6d 20 32 20 | 34 5d 20 32 5d 29 0a 28 |." [m 2 |4] 2]).(|
|00002880| 66 73 65 74 20 27 76 6d | 2d 76 73 2d 75 6e 61 6e |fset 'vm|-vs-unan|
|00002890| 73 77 65 72 65 64 20 27 | 76 6d 2d 76 73 2d 75 6e |swered '|vm-vs-un|
|000028a0| 72 65 70 6c 69 65 64 29 | 0a 28 64 65 66 61 6c 69 |replied)|.(defali|
|000028b0| 61 73 20 27 76 6d 2d 76 | 73 2d 75 6e 66 6f 72 77 |as 'vm-v|s-unforw|
|000028c0| 61 72 64 65 64 20 23 5b | 28 6d 29 20 22 08 c1 48 |arded #[|(m) "..H|
|000028d0| c2 48 3f 87 22 20 5b 6d | 20 32 20 36 5d 20 32 5d |.H?." [m| 2 6] 2]|
|000028e0| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 76 6d 2d |).(defal|ias 'vm-|
|000028f0| 76 73 2d 75 6e 72 65 64 | 69 73 74 72 69 62 75 74 |vs-unred|istribut|
|00002900| 65 64 20 23 5b 28 6d 29 | 20 22 08 c1 48 c2 48 3f |ed #[(m)| "..H.H?|
|00002910| 87 22 20 5b 6d 20 32 20 | 38 5d 20 32 5d 29 0a 28 |." [m 2 |8] 2]).(|
|00002920| 64 65 66 61 6c 69 61 73 | 20 27 76 6d 2d 76 73 2d |defalias| 'vm-vs-|
|00002930| 75 6e 66 69 6c 65 64 20 | 23 5b 28 6d 29 20 22 08 |unfiled |#[(m) ".|
|00002940| c1 48 c2 48 3f 87 22 20 | 5b 6d 20 32 20 33 5d 20 |.H.H?." |[m 2 3] |
|00002950| 32 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |2]).(def|alias 'v|
|00002960| 6d 2d 76 73 2d 75 6e 77 | 72 69 74 74 65 6e 20 23 |m-vs-unw|ritten #|
|00002970| 5b 28 6d 29 20 22 08 c1 | 48 c2 48 3f 87 22 20 5b |[(m) "..|H.H?." [|
|00002980| 6d 20 32 20 35 5d 20 32 | 5d 29 0a 28 64 65 66 61 |m 2 5] 2|]).(defa|
|00002990| 6c 69 61 73 20 27 76 6d | 2d 76 73 2d 75 6e 6d 61 |lias 'vm|-vs-unma|
|000029a0| 72 6b 65 64 20 23 5b 28 | 6d 29 20 22 08 c1 48 c2 |rked #[(|m) "..H.|
|000029b0| 48 3f 87 22 20 5b 6d 20 | 31 20 32 5d 20 32 5d 29 |H?." [m |1 2] 2])|
|000029c0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 76 6d 2d 76 |.(defali|as 'vm-v|
|000029d0| 73 2d 75 6e 65 64 69 74 | 65 64 20 23 5b 28 6d 29 |s-unedit|ed #[(m)|
|000029e0| 20 22 08 c1 48 c2 48 3f | 87 22 20 5b 6d 20 32 20 | "..H.H?|." [m 2 |
|000029f0| 37 5d 20 32 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 |7] 2]).(|byte-cod|
|00002a00| 65 20 22 c0 c1 c2 c3 23 | 88 c0 c4 c2 c5 23 88 c0 |e "....#|.....#..|
|00002a10| c6 c2 c7 23 88 c0 c8 c2 | c9 23 88 c0 ca c2 cb 23 |...#....|.#.....#|
|00002a20| 88 c0 cc c2 cd 23 88 c0 | ce c2 cd 23 88 c0 cf c2 |.....#..|...#....|
|00002a30| d0 23 88 c0 d1 c2 d0 23 | 88 c0 d2 c2 d3 23 88 c0 |.#.....#|.....#..|
|00002a40| d4 c2 d5 23 88 c0 d6 c2 | d7 23 88 c0 d8 c2 d9 23 |...#....|.#.....#|
|00002a50| 88 c0 da c2 db 23 88 c0 | dc c2 dd 23 88 c0 de c2 |.....#..|...#....|
|00002a60| df 23 88 c0 c1 e0 e1 23 | 88 c0 c4 e0 c4 23 88 c0 |.#.....#|.....#..|
|00002a70| c6 e0 e1 23 88 c0 c8 e0 | e1 23 88 c0 ca e0 e1 23 |...#....|.#.....#|
|00002a80| 88 c0 cc e0 e1 23 88 c0 | ce e0 e1 23 88 c0 cf e0 |.....#..|...#....|
|00002a90| e1 23 88 c0 d1 e0 e1 23 | 88 c0 d2 e0 e1 23 88 c0 |.#.....#|.....#..|
|00002aa0| d4 e0 e1 23 88 c0 d6 e0 | e1 23 88 c0 d8 e0 e2 23 |...#....|.#.....#|
|00002ab0| 88 c0 da e0 e2 23 88 c0 | dc e0 e2 23 88 c0 de e0 |.....#..|...#....|
|00002ac0| e2 23 87 22 20 5b 70 75 | 74 20 68 65 61 64 65 72 |.#." [pu|t header|
|00002ad0| 20 76 6d 2d 76 69 72 74 | 75 61 6c 2d 73 65 6c 65 | vm-virt|ual-sele|
|00002ae0| 63 74 6f 72 2d 63 6c 61 | 75 73 65 20 22 77 69 74 |ctor-cla|use "wit|
|00002af0| 68 20 68 65 61 64 65 72 | 20 6d 61 74 63 68 69 6e |h header| matchin|
|00002b00| 67 22 20 6c 61 62 65 6c | 20 22 77 69 74 68 20 6c |g" label| "with l|
|00002b10| 61 62 65 6c 20 6f 66 22 | 20 74 65 78 74 20 22 77 |abel of"| text "w|
|00002b20| 69 74 68 20 74 65 78 74 | 20 6d 61 74 63 68 69 6e |ith text| matchin|
|00002b30| 67 22 20 68 65 61 64 65 | 72 2d 6f 72 2d 74 65 78 |g" heade|r-or-tex|
|00002b40| 74 20 22 77 69 74 68 20 | 68 65 61 64 65 72 20 6f |t "with |header o|
|00002b50| 72 20 74 65 78 74 20 6d | 61 74 63 68 69 6e 67 22 |r text m|atching"|
|00002b60| 20 72 65 63 69 70 69 65 | 6e 74 20 22 77 69 74 68 | recipie|nt "with|
|00002b70| 20 72 65 63 69 70 69 65 | 6e 74 20 6d 61 74 63 68 | recipie|nt match|
|00002b80| 69 6e 67 22 20 61 75 74 | 68 6f 72 2d 6f 72 2d 72 |ing" aut|hor-or-r|
|00002b90| 65 63 69 70 69 65 6e 74 | 20 22 77 69 74 68 20 61 |ecipient| "with a|
|00002ba0| 75 74 68 6f 72 20 6f 72 | 20 72 65 63 69 70 69 65 |uthor or| recipie|
|00002bb0| 6e 74 20 6d 61 74 63 68 | 69 6e 67 22 20 73 65 6e |nt match|ing" sen|
|00002bc0| 64 65 72 2d 6f 72 2d 72 | 65 63 69 70 69 65 6e 74 |der-or-r|ecipient|
|00002bd0| 20 61 75 74 68 6f 72 20 | 22 77 69 74 68 20 61 75 | author |"with au|
|00002be0| 74 68 6f 72 20 6d 61 74 | 63 68 69 6e 67 22 20 73 |thor mat|ching" s|
|00002bf0| 65 6e 64 65 72 20 73 75 | 62 6a 65 63 74 20 22 77 |ender su|bject "w|
|00002c00| 69 74 68 20 73 75 62 6a | 65 63 74 20 6d 61 74 63 |ith subj|ect matc|
|00002c10| 68 69 6e 67 22 20 73 65 | 6e 74 2d 62 65 66 6f 72 |hing" se|nt-befor|
|00002c20| 65 20 22 73 65 6e 74 20 | 62 65 66 6f 72 65 22 20 |e "sent |before" |
|00002c30| 73 65 6e 74 2d 61 66 74 | 65 72 20 22 73 65 6e 74 |sent-aft|er "sent|
|00002c40| 20 61 66 74 65 72 22 20 | 6d 6f 72 65 2d 63 68 61 | after" |more-cha|
|00002c50| 72 73 2d 74 68 61 6e 20 | 22 77 69 74 68 20 6d 6f |rs-than |"with mo|
|00002c60| 72 65 20 63 68 61 72 61 | 63 74 65 72 73 20 74 68 |re chara|cters th|
|00002c70| 61 6e 22 20 6c 65 73 73 | 2d 63 68 61 72 73 2d 74 |an" less|-chars-t|
|00002c80| 68 61 6e 20 22 77 69 74 | 68 20 6c 65 73 73 20 63 |han "wit|h less c|
|00002c90| 68 61 72 61 63 74 65 72 | 73 20 74 68 61 6e 22 20 |haracter|s than" |
|00002ca0| 6d 6f 72 65 2d 6c 69 6e | 65 73 2d 74 68 61 6e 20 |more-lin|es-than |
|00002cb0| 22 77 69 74 68 20 6d 6f | 72 65 20 6c 69 6e 65 73 |"with mo|re lines|
|00002cc0| 20 74 68 61 6e 22 20 6c | 65 73 73 2d 6c 69 6e 65 | than" l|ess-line|
|00002cd0| 73 2d 74 68 61 6e 20 22 | 77 69 74 68 20 6c 65 73 |s-than "|with les|
|00002ce0| 73 20 6c 69 6e 65 73 20 | 74 68 61 6e 22 20 76 6d |s lines |than" vm|
|00002cf0| 2d 76 69 72 74 75 61 6c | 2d 73 65 6c 65 63 74 6f |-virtual|-selecto|
|00002d00| 72 2d 61 72 67 2d 74 79 | 70 65 20 73 74 72 69 6e |r-arg-ty|pe strin|
|00002d10| 67 20 6e 75 6d 62 65 72 | 5d 20 34 29 0a 28 64 65 |g number|] 4).(de|
|00002d20| 66 61 6c 69 61 73 20 27 | 76 6d 2d 72 65 61 64 2d |falias '|vm-read-|
|00002d30| 76 69 72 74 75 61 6c 2d | 73 65 6c 65 63 74 6f 72 |virtual-|selector|
|00002d40| 20 23 5b 28 70 72 6f 6d | 70 74 29 20 22 c0 89 19 | #[(prom|pt) "...|
|00002d50| 1a c3 0c 0d 5c 22 12 c6 | 5c 6e 21 89 12 c7 4e 89 |....\"..|\n!...N.|
|00002d60| 1e 08 ab b9 0c c9 ca 4f | cb 5c 6e cc 4e cd 52 14 |.......O|.\n.N.R.|
|00002d70| ce cf 20 21 88 0e 08 d0 | 61 ab 86 d1 0c 21 11 aa |.. !....|a....!..|
|00002d80| 9d 0e 08 d2 61 ab 93 c0 | d3 1e 14 1e 15 c3 0c d6 |....a...|........|
|00002d90| 0e 17 21 c0 23 97 11 2a | aa 84 d8 0c 21 11 29 d9 |..!.#..*|....!.).|
|00002da0| c6 da db 5c 6e 21 50 21 | 21 ac 84 dc dd 21 88 5c |...\n!P!|!....!.\|
|00002db0| 6e 09 2a 44 87 22 20 5b | 6e 69 6c 20 61 72 67 20 |n.*D." [|nil arg |
|00002dc0| 73 65 6c 65 63 74 6f 72 | 20 76 6d 2d 72 65 61 64 |selector| vm-read|
|00002dd0| 2d 73 74 72 69 6e 67 20 | 70 72 6f 6d 70 74 20 76 |-string |prompt v|
|00002de0| 6d 2d 73 75 70 70 6f 72 | 74 65 64 2d 69 6e 74 65 |m-suppor|ted-inte|
|00002df0| 72 61 63 74 69 76 65 2d | 76 69 72 74 75 61 6c 2d |ractive-|virtual-|
|00002e00| 73 65 6c 65 63 74 6f 72 | 73 20 69 6e 74 65 72 6e |selector|s intern|
|00002e10| 20 76 6d 2d 76 69 72 74 | 75 61 6c 2d 73 65 6c 65 | vm-virt|ual-sele|
|00002e20| 63 74 6f 72 2d 61 72 67 | 2d 74 79 70 65 20 61 72 |ctor-arg|-type ar|
|00002e30| 67 2d 74 79 70 65 20 30 | 20 2d 32 20 22 20 22 20 |g-type 0| -2 " " |
|00002e40| 76 6d 2d 76 69 72 74 75 | 61 6c 2d 73 65 6c 65 63 |vm-virtu|al-selec|
|00002e50| 74 6f 72 2d 63 6c 61 75 | 73 65 20 22 3a 20 22 20 |tor-clau|se ": " |
|00002e60| 72 61 69 73 65 2d 66 72 | 61 6d 65 20 73 65 6c 65 |raise-fr|ame sele|
|00002e70| 63 74 65 64 2d 66 72 61 | 6d 65 20 6e 75 6d 62 65 |cted-fra|me numbe|
|00002e80| 72 20 76 6d 2d 72 65 61 | 64 2d 6e 75 6d 62 65 72 |r vm-rea|d-number|
|00002e90| 20 6c 61 62 65 6c 20 74 | 20 63 6f 6d 70 6c 65 74 | label t| complet|
|00002ea0| 69 6f 6e 2d 69 67 6e 6f | 72 65 2d 63 61 73 65 20 |ion-igno|re-case |
|00002eb0| 76 6d 2d 63 6f 6d 70 6c | 65 74 69 6f 6e 2d 61 75 |vm-compl|etion-au|
|00002ec0| 74 6f 2d 63 6f 72 72 65 | 63 74 20 76 6d 2d 6f 62 |to-corre|ct vm-ob|
|00002ed0| 61 72 72 61 79 2d 74 6f | 2d 73 74 72 69 6e 67 2d |array-to|-string-|
|00002ee0| 6c 69 73 74 20 76 6d 2d | 6c 61 62 65 6c 2d 6f 62 |list vm-|label-ob|
|00002ef0| 61 72 72 61 79 20 72 65 | 61 64 2d 73 74 72 69 6e |array re|ad-strin|
|00002f00| 67 20 66 62 6f 75 6e 64 | 70 20 22 76 6d 2d 76 73 |g fbound|p "vm-vs|
|00002f10| 2d 22 20 73 79 6d 62 6f | 6c 2d 6e 61 6d 65 20 65 |-" symbo|l-name e|
|00002f20| 72 72 6f 72 20 22 49 6e | 76 61 6c 69 64 20 73 65 |rror "In|valid se|
|00002f30| 6c 65 63 74 6f 72 22 5d | 20 36 5d 29 0a 28 64 65 |lector"]| 6]).(de|
|00002f40| 66 61 6c 69 61 73 20 27 | 76 6d 2d 76 69 72 74 75 |falias '|vm-virtu|
|00002f50| 61 6c 2d 71 75 69 74 20 | 23 5b 6e 69 6c 20 22 8a |al-quit |#[nil ".|
|00002f60| 08 c1 61 ab dc c2 c3 0c | c5 23 89 14 0e 06 70 c5 |..a.....|.#....p.|
|00002f70| 1e 07 1e 08 1e 09 89 1e | 5c 6e ab 95 0e 5c 6e 40 |........|\n...\n@|
|00002f80| 71 88 cb 0e 08 0e 0c 5c | 22 16 0c 0e 5c 6e 41 89 |q......\|"...\nA.|
|00002f90| 16 5c 6e ac 6b 0e 09 ad | a9 0e 09 40 cd 48 ce 48 |.\n.k...|...@.H.H|
|00002fa0| 4a cf 48 cd 48 cb 0e 09 | 40 0e 09 40 cd 48 ce 48 |J.H.H...|@..@.H.H|
|00002fb0| 4a cf 48 cd 48 4a 5c 22 | 4c 88 0e 09 41 89 16 09 |J.H.HJ\"|L...A...|
|00002fc0| ac 58 d0 2c 82 50 01 08 | d1 61 85 50 01 c2 c3 0e |.X.,.P..|.a.P....|
|00002fd0| 0c c5 23 89 16 0c 0e 06 | d0 70 c5 1e 07 1e 08 1e |..#.....|.p......|
|00002fe0| 12 1e 09 1e 5c 6e 0e 09 | ab b0 0e 09 40 cf 48 cd |....\n..|....@.H.|
|00002ff0| 48 4a 89 16 12 ab 91 0e | 12 40 cd 48 d3 d4 49 88 |HJ......|.@.H..I.|
|00003000| 0e 12 41 89 16 12 ac 6f | 0e 09 40 cf 48 cd 48 d0 |..A....o|..@.H.H.|
|00003010| 4c 88 0e 09 41 89 16 09 | ac 50 0e 5c 6e 85 4f 01 |L...A...|.P.\n.O.|
|00003020| 0e 5c 6e 40 71 88 cb 0e | 08 0c 5c 22 14 0e 15 ab |.\n@q...|..\"....|
|00003030| cc 0e 15 40 cd 48 d3 48 | d4 6b ab c1 d6 20 88 0e |...@.H.H|.k... ..|
|00003040| 15 16 12 0e 15 ab 93 0e | 15 40 cd 48 d3 48 d4 6b |........|.@.H.H.k|
|00003050| ab 88 0e 15 41 89 16 15 | ac 6d 0e 15 ac 9f 0e 12 |....A...|.m......|
|00003060| 89 16 15 ab 98 0e 15 40 | cd 48 d3 48 d4 6b ab 8d |.......@|.H.H.k..|
|00003070| 0e 15 40 cd 48 d7 48 4a | 89 16 15 ac 68 c2 d8 0e |..@.H.HJ|....h...|
|00003080| 06 d0 23 16 06 0e 15 ac | 84 0e 06 16 15 0e 19 ac |..#.....|........|
|00003090| 83 d0 16 19 da 20 88 db | 20 88 dc c5 21 88 dd c5 |..... ..| ...!...|
|000030a0| 21 88 0e 15 ab 85 de 20 | 88 aa 83 df 20 88 0e 5c |!...... |.... ..\|
|000030b0| 6e 41 89 16 5c 6e 84 b9 | 00 d0 2d 29 87 22 20 5b |nA..\n..|..-)." [|
|000030c0| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 76 6d 2d 76 69 |major-mo|de vm-vi|
|000030d0| 72 74 75 61 6c 2d 6d 6f | 64 65 20 76 6d 2d 64 65 |rtual-mo|de vm-de|
|000030e0| 6c 65 74 65 20 62 75 66 | 66 65 72 2d 6e 61 6d 65 |lete buf|fer-name|
|000030f0| 20 76 6d 2d 72 65 61 6c | 2d 62 75 66 66 65 72 73 | vm-real|-buffers|
|00003100| 20 74 20 76 6d 2d 6d 65 | 73 73 61 67 65 2d 6c 69 | t vm-me|ssage-li|
|00003110| 73 74 20 69 6e 68 69 62 | 69 74 2d 71 75 69 74 20 |st inhib|it-quit |
|00003120| 62 20 6d 70 20 62 70 20 | 64 65 6c 71 20 76 6d 2d |b mp bp |delq vm-|
|00003130| 76 69 72 74 75 61 6c 2d | 62 75 66 66 65 72 73 20 |virtual-|buffers |
|00003140| 31 20 35 20 34 20 6e 69 | 6c 20 76 6d 2d 6d 6f 64 |1 5 4 ni|l vm-mod|
|00003150| 65 20 76 6d 70 20 38 20 | 22 51 22 20 76 6d 2d 6d |e vmp 8 |"Q" vm-m|
|00003160| 65 73 73 61 67 65 2d 70 | 6f 69 6e 74 65 72 20 76 |essage-p|ointer v|
|00003170| 6d 2d 67 61 72 62 61 67 | 65 2d 63 6f 6c 6c 65 63 |m-garbag|e-collec|
|00003180| 74 2d 6d 65 73 73 61 67 | 65 20 36 20 23 5b 28 6d |t-messag|e 6 #[(m|
|00003190| 29 20 22 08 c1 48 c2 48 | c3 6b 87 22 20 5b 6d 20 |) "..H.H|.k." [m |
|000031a0| 31 20 38 20 22 51 22 5d | 20 32 5d 20 76 6d 2d 6c |1 8 "Q"]| 2] vm-l|
|000031b0| 61 73 74 2d 6d 65 73 73 | 61 67 65 2d 70 6f 69 6e |ast-mess|age-poin|
|000031c0| 74 65 72 20 76 6d 2d 63 | 6c 65 61 72 2d 76 69 72 |ter vm-c|lear-vir|
|000031d0| 74 75 61 6c 2d 71 75 69 | 74 2d 69 6e 76 61 6c 69 |tual-qui|t-invali|
|000031e0| 64 61 74 65 64 2d 75 6e | 64 6f 73 20 76 6d 2d 72 |dated-un|dos vm-r|
|000031f0| 65 76 65 72 73 65 2d 6c | 69 6e 6b 2d 6d 65 73 73 |everse-l|ink-mess|
|00003200| 61 67 65 73 20 76 6d 2d | 73 65 74 2d 6e 75 6d 62 |ages vm-|set-numb|
|00003210| 65 72 69 6e 67 2d 72 65 | 64 6f 2d 73 74 61 72 74 |ering-re|do-start|
|00003220| 2d 70 6f 69 6e 74 20 76 | 6d 2d 73 65 74 2d 73 75 |-point v|m-set-su|
|00003230| 6d 6d 61 72 79 2d 72 65 | 64 6f 2d 73 74 61 72 74 |mmary-re|do-start|
|00003240| 2d 70 6f 69 6e 74 20 76 | 6d 2d 70 72 65 76 69 65 |-point v|m-previe|
|00003250| 77 2d 63 75 72 72 65 6e | 74 2d 6d 65 73 73 61 67 |w-curren|t-messag|
|00003260| 65 20 76 6d 2d 75 70 64 | 61 74 65 2d 73 75 6d 6d |e vm-upd|ate-summ|
|00003270| 61 72 79 2d 61 6e 64 2d | 6d 6f 64 65 2d 6c 69 6e |ary-and-|mode-lin|
|00003280| 65 5d 20 36 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |e] 6]).(|defalias|
|00003290| 20 27 76 6d 2d 76 69 72 | 74 75 61 6c 2d 73 61 76 | 'vm-vir|tual-sav|
|000032a0| 65 2d 66 6f 6c 64 65 72 | 20 23 5b 28 70 72 65 66 |e-folder| #[(pref|
|000032b0| 69 78 29 20 22 8a c0 c1 | 5c 6e c3 23 89 12 89 1c |ix) "...|\n.#....|
|000032c0| ab 8f 0c 40 71 88 c5 0e | 06 21 88 0c 41 89 14 ac |...@q...|.!..A...|
|000032d0| 71 2a c7 c8 21 88 c9 20 | 88 ca 20 87 22 20 5b 76 |q*..!.. |.. ." [v|
|000032e0| 6d 2d 64 65 6c 65 74 65 | 20 62 75 66 66 65 72 2d |m-delete| buffer-|
|000032f0| 6e 61 6d 65 20 76 6d 2d | 72 65 61 6c 2d 62 75 66 |name vm-|real-buf|
|00003300| 66 65 72 73 20 74 20 62 | 70 20 76 6d 2d 73 61 76 |fers t b|p vm-sav|
|00003310| 65 2d 66 6f 6c 64 65 72 | 20 70 72 65 66 69 78 20 |e-folder| prefix |
|00003320| 76 6d 2d 73 65 74 2d 62 | 75 66 66 65 72 2d 6d 6f |vm-set-b|uffer-mo|
|00003330| 64 69 66 69 65 64 2d 70 | 20 6e 69 6c 20 76 6d 2d |dified-p| nil vm-|
|00003340| 63 6c 65 61 72 2d 6d 6f | 64 69 66 69 63 61 74 69 |clear-mo|dificati|
|00003350| 6f 6e 2d 66 6c 61 67 2d | 75 6e 64 6f 73 20 76 6d |on-flag-|undos vm|
|00003360| 2d 75 70 64 61 74 65 2d | 73 75 6d 6d 61 72 79 2d |-update-|summary-|
|00003370| 61 6e 64 2d 6d 6f 64 65 | 2d 6c 69 6e 65 5d 20 35 |and-mode|-line] 5|
|00003380| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|00003390| 2d 76 69 72 74 75 61 6c | 2d 67 65 74 2d 6e 65 77 |-virtual|-get-new|
|000033a0| 2d 6d 61 69 6c 20 23 5b | 6e 69 6c 20 22 8a c0 c1 |-mail #[|nil "...|
|000033b0| 5c 6e c3 23 89 12 89 1c | ab 8f 0c 40 71 88 c5 c6 |\n.#....|...@q...|
|000033c0| c7 8f 88 0c 41 89 14 ac | 71 2a c8 20 87 22 20 5b |....A...|q*. ." [|
|000033d0| 76 6d 2d 64 65 6c 65 74 | 65 20 62 75 66 66 65 72 |vm-delet|e buffer|
|000033e0| 2d 6e 61 6d 65 20 76 6d | 2d 72 65 61 6c 2d 62 75 |-name vm|-real-bu|
|000033f0| 66 66 65 72 73 20 74 20 | 62 70 20 65 72 72 6f 72 |ffers t |bp error|
|00003400| 2d 64 61 74 61 20 28 76 | 6d 2d 67 65 74 2d 6e 65 |-data (v|m-get-ne|
|00003410| 77 2d 6d 61 69 6c 29 20 | 28 28 66 6f 6c 64 65 72 |w-mail) |((folder|
|00003420| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 28 62 79 74 65 |-read-on|ly (byte|
|00003430| 2d 63 6f 64 65 20 22 c0 | c1 5c 6e ae 82 c3 20 5c |-code ".|.\n... \|
|00003440| 22 88 c4 c5 21 87 22 20 | 5b 6d 65 73 73 61 67 65 |"...!." |[message|
|00003450| 20 22 46 6f 6c 64 65 72 | 20 69 73 20 72 65 61 64 | "Folder| is read|
|00003460| 20 6f 6e 6c 79 3a 20 25 | 73 22 20 62 75 66 66 65 | only: %|s" buffe|
|00003470| 72 2d 66 69 6c 65 2d 6e | 61 6d 65 20 62 75 66 66 |r-file-n|ame buff|
|00003480| 65 72 2d 6e 61 6d 65 20 | 73 69 74 2d 66 6f 72 20 |er-name |sit-for |
|00003490| 31 5d 20 33 29 29 20 28 | 75 6e 72 65 63 6f 67 6e |1] 3)) (|unrecogn|
|000034a0| 69 7a 65 64 2d 66 6f 6c | 64 65 72 2d 74 79 70 65 |ized-fol|der-type|
|000034b0| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 c1 5c | (byte-c|ode "..\|
|000034c0| 6e ae 82 c3 20 5c 22 88 | c4 c5 21 87 22 20 5b 6d |n... \".|..!." [m|
|000034d0| 65 73 73 61 67 65 20 22 | 46 6f 6c 64 65 72 20 74 |essage "|Folder t|
|000034e0| 79 70 65 20 69 73 20 75 | 6e 72 65 63 6f 67 6e 69 |ype is u|nrecogni|
|000034f0| 7a 65 64 3a 20 25 73 22 | 20 62 75 66 66 65 72 2d |zed: %s"| buffer-|
|00003500| 66 69 6c 65 2d 6e 61 6d | 65 20 62 75 66 66 65 72 |file-nam|e buffer|
|00003510| 2d 6e 61 6d 65 20 73 69 | 74 2d 66 6f 72 20 31 5d |-name si|t-for 1]|
|00003520| 20 33 29 29 29 20 76 6d | 2d 65 6d 69 74 2d 74 6f | 3))) vm|-emit-to|
|00003530| 74 61 6c 73 2d 62 6c 75 | 72 62 5d 20 35 5d 29 0a |tals-blu|rb] 5]).|
|00003540| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 6d 61 |(defalia|s 'vm-ma|
|00003550| 6b 65 2d 76 69 72 74 75 | 61 6c 2d 63 6f 70 79 20 |ke-virtu|al-copy |
|00003560| 23 5b 28 6d 29 20 22 7e | 88 70 08 c1 48 c2 48 4a |#[(m) "~|.p..H.HJ|
|00003570| c3 c4 20 1d 1e 06 1e 07 | 1e 08 c9 8e 8a 0e 07 c1 |.. .....|........|
|00003580| 48 ca 48 71 88 8c 7e 88 | cb 0e 07 21 88 cc 0e 08 |H.Hq..~.|...!....|
|00003590| 0e 07 cd 48 cd 48 0e 07 | cd 48 c2 48 23 88 2b 08 |...H.H..|.H.H#.+.|
|000035a0| cd 48 cd 48 65 c3 93 88 | 08 cd 48 c1 48 08 cd 48 |.H.He...|..H.H..H|
|000035b0| cd 48 0e 07 cd 48 c1 48 | 0e 07 cd 48 cd 48 5a 5c |.H...H.H|...H.HZ\|
|000035c0| 5c c3 93 88 cb 08 21 08 | cd 48 cd 48 cb 0e 07 21 |\.....!.|.H.H...!|
|000035d0| 0e 07 cd 48 cd 48 5a 5c | 5c c3 93 88 ce 08 21 08 |...H.HZ\|\.....!.|
|000035e0| cd 48 cd 48 ce 0e 07 21 | 0e 07 cd 48 cd 48 5a 5c |.H.H...!|...H.HZ\|
|000035f0| 5c c3 93 88 08 cd 48 cf | 48 08 cd 48 cd 48 0e 07 |\.....H.|H..H.H..|
|00003600| cd 48 cf 48 0e 07 cd 48 | cd 48 5a 5c 5c c3 93 88 |.H.H...H|.HZ\\...|
|00003610| 08 cd 48 c2 48 08 cd 48 | cd 48 0e 07 cd 48 c2 48 |..H.H..H|.H...H.H|
|00003620| 0e 07 cd 48 cd 48 5a 5c | 5c c3 93 2c 87 22 20 5b |...H.HZ\|\..,." [|
|00003630| 6d 20 31 20 35 20 6e 69 | 6c 20 62 75 66 66 65 72 |m 1 5 ni|l buffer|
|00003640| 2d 6d 6f 64 69 66 69 65 | 64 2d 70 20 6d 6f 64 69 |-modifie|d-p modi|
|00003650| 66 69 65 64 20 62 75 66 | 66 65 72 2d 72 65 61 64 |fied buf|fer-read|
|00003660| 2d 6f 6e 6c 79 20 72 65 | 61 6c 2d 6d 20 76 69 72 |-only re|al-m vir|
|00003670| 74 75 61 6c 2d 62 75 66 | 66 65 72 20 28 28 73 65 |tual-buf|fer ((se|
|00003680| 74 2d 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |t-buffer|-modifie|
|00003690| 64 2d 70 20 6d 6f 64 69 | 66 69 65 64 29 29 20 39 |d-p modi|fied)) 9|
|000036a0| 20 76 6d 2d 76 68 65 61 | 64 65 72 73 2d 6f 66 20 | vm-vhea|ders-of |
|000036b0| 63 6f 70 79 2d 74 6f 2d | 62 75 66 66 65 72 20 30 |copy-to-|buffer 0|
|000036c0| 20 76 6d 2d 74 65 78 74 | 2d 6f 66 20 34 5d 20 35 | vm-text|-of 4] 5|
|000036d0| 5d 29 0a | |]). | |
+--------+-------------------------+-------------------------+--------+--------+
